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Preface 


This publication describes the internal logic and organization of the five service 
aid programs provided for use in servicing MVS/XA. The publication is intended 
for the IBM programming systems representative who is involved in maintaining 
the service aid programs. For information about the use and operation of the 
service aid programs, refer to System Programming Library: Service Aids, 
GC28-1159. 


How This Publication is Organized 


This publication contains five chapters preceded by a General Information section 
and an Abbreviation Dictionary and followed by an Index. Each of the chapters 
corresponds to one of the service aid programs. Notice that the chapters are 
arranged in alphabetical order by the shortened service aid program name. 


The General Information section introduces the concept of a service aid briefly 
describes each of the service aid programs. The Abbreviation Dictionary lists 
some of the abbreviations and acronyms used in this publication and their 
meanings. 


Each chapter is divided into the following sections: 


@ The Introduction — a description of the service aid in general with some 
discussion of external characteristics. 


@ Method of Operation — a functional approach to the program using both 
diagrams and text. 


@ Program Organization — a description of program loading, storage layout, 
module calling sequences, and the modules themselves. 


@ Data Areas — a description of the major data areas used by the service aid 
program. Where applicable, this section contains references to detailed 


descriptions of the data areas in other publications. 


@ Diagnostic Aids — information that can be useful for diagnosing problems in 
the service aid program. 
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Related Publications J 


The following publications are referred to in the text: 


MVS/Extended Architecture System Programming Library: Service Aids, 
GC28-1159. 


MVS/Extended Architecture SYSI1.LOGREC Error Recording, GC28-1162. 
MVS/Extended Architecture Debugging Handbook. 

Volume | — LC28-1164 

Volume 2 — LC28-1165 

Volume 3 — LC28-1166 

Volume 4 — LC28-1167 

Volume 5 — LC28-1168 


MVS/Extended Architecture Interactive Problem Control System Logic and 
Diagnosis, LY 28-1298 


MVS/Extended Architecture Message Library: System Messages, GC28-1156. 


MVS/Extended Architecture System Logic Library (multiple volumes). Volume 1, 
LY 28-1208, contains order numbers for all volumes. 





ACE/VTAM Version 2 Diagnosis Guide, SY38-0615. ) 
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General Information 


A service aid program is intended to aid in the diagnosis of system and 
application program failures. The main functions of a service aid are to: 


@ Collect data that relates to the failure. 
@ Format and pmnt the data in a form applicable to debugging. 
@ Aid in developing and applying an immediate fix for a problem. 


The following programs are service aids: 


@ The generalized trace facility (GIF), which traces selected system and 
application program events and records the data for formatting and printing 
by the AMDPRDM*P service aid program or by the ABEND/SNAP routines. 


@ AMASPZAP, which inspects and modifies data in a load module that is part 
of a partitioned data set or in a specific data record that is contained in a 
direct access data set; AMASPZAP also dumps records from data sets 
residing on direct access storage devices. 


@ AMBLIST, which produces formatted object module, load module, nucleus, 
and cross-reference listings, as well as load module and link pack area maps 
and CSECT identification record information. 


@ AMDPRDMP, which formats and pmnts the contents of the AMDSADMP 
output data set, the SYS1.DUMPnn data sets. i SYSMDUMP ABEND 
dump, or any dumps produced by SVC dump. and the GTF trace data set. 

@ AMDSADMP, which produces a dump of reai storage, instruction trace data 
(created by the console-initiated loop recording) and critical areas of each 


active address space. 


The following service aid is described in the pubitcation MVS/Extended 
Architecture SYS].LOGREC Error Recording Logic. 


@ IFCDIP00, which initializes the SYSI1.LOGREC data set. 


The following service aid is described in Environmental Recording Editing and 
Printing (EREP) Program Logic. 


@ IFCEREP!, which edits records from the SYS1.LOGREC data set and writes 
them to a specified output device. 
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Abbreviation Dictionary 


Abbreviation Meaning 

AID record identifier 

ARB address range block 

ASCB address space control block 

ASID address space identifier 

ASXB address space control block extension 
ASVT address space vector table 

ASMVT auxiliary storage manager vector table 
BCB buffer control block 

BCT buffer control table 

BSAM basic sequential access method 

CCT common communication/control table 
CCW channel command word 

CDE contents directory entry 

CESD composite external symbol dictionary 
CHPID channel path identifier 

CS control section name 

CSCB command scheduling control block 
CSCH clear subchannel 

CSD common system data area 

CSECT control section 

CVT communication vector table 

DA data area or direct access 

DAT dynamic address translation 

DCB data control block 

DEB data extent block 

DLIB distribution library 

DQE description queue element 

DS data set 

DSCB data set control block 

DSCE dynamic storage control element 
EBCDIC extended binary-coded-decimal interchange code 
ECB event control block 

ECT exit control table 

ECTE exit control table entry 

EID event identifier 

EOF end of file 

EOV end of volume 

EP entry point name 

EPA entry point address 

ERB error recovery block 

ESD external symbol dictionary 

FID format identifier 
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FXTAB 
GSMQ 
GSPL 
GTF 
GTFBCB 
GTFBLOK 
GTFBUFR 
GTFPCT 
HSCH 
ICR 

IDR 
INITDATA 
lO 

IODB 

IOS 

IPL 

IQE 

IRB 

ICL 

JFCB 
JOBNAME 
LCCA 
LCCAVT 
LGVT 
LIST 

LLE 

LPA 

LPID 
LPRB 
LR 
LRECL 
LSID 
LSMQ 
LSPL 
LSQA 

cE 

LTH 

MC 
MCAWSA 
MCCD 
MCCE 
MCCLE 
MCED 
MCEE 
MCHEAD 
MCQE 
MCRWSA 
MN 
MSCH 
PCB 

PCI 

PDS 

PER 

PFT 
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fix table 

global service manager queue 
global service priority list queue 
generalized trace facility service aid program 
GTF buffer control block 

GTF blocking area 

GTF buffer 

GTF primary control table 

halt subchannel 

independent component release 
CSECT identification record 
initialization data 

input/output 

I/O device block 

input/output supervisor 

initial program load 
interruption queue element 
interruption request block 

job control language 

job file control block 

job name 

logical configuration communication area 
logical configuration communication area vector table 
logical group vector table 
AMBLIST service aid program 
load list element 

link pack area 

logical page identifier 

loaded program request block 
label reference 

logical record length 

logical slot identifier 

logical service manager queue 
logical service priority list 

local system queue area 

logical track 

logical track header 

monitor call 

monitor call application work/save area 
monitor call class directory 
monitor call control element 
monitor call class element 
monitor call event directory 
monitor call event element 
monitor call base table 

monitor call queue element 
monitor call router work/save area 
module name 

modify subchannel 

print control block 

program controlled interruption 
partitioned data set 

program event recording 

page frame table 
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PICA 
PRDMP 
PSW 
PTF 
QCB 
QCR 
QEL 
RAD 
RANGETAB 
RB 
RCB 
RCSW 
RE 
RECFM 
RLD 
RLT 
RNIO 
RQE 
RSM 
SADMP 
SAT 
SCSW 
SD 
SDATA 
SLE 
SLH 
SLIP 
SPZAP 
SQA 

SR 
SSCH 
SSI 

STA 
SUT 
SVC 
SYSGEN 
SYSIN 
SYSOUT 
TCAM 
TCB 
TIOT 
TOD 
TQE 
TTR 
UCB 
VCCT 
VOLID 
VPA 

VS 
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program interruption control area 
AMDPRDMP service aid program 
program status word 

program temporary fix 

queue control block 

queue control record 

queue element 

RSM address space data 

range table 

request block 

recovery control block 

real channel status word 

record entry 

record format 

relocatable load dictionary 
relocation table 

remote network input/output 
replay queue element 

real storage management 
AMDSADMP service aid program 
swap address table 

subchannel status word 

section definition 

service data area 

save list element 

subchannel logout handler 
serviceability level indication processing 
AMASPZAP service aid program 
system queue area 

subroutine 

Start subchannel 

system index status 

Starting address 

storage use table 

supervisor call 

system generation 

system input 

system output 

telecommunications access method 
task control block 

task input/output table 

time of day 

timer queue element 

relative trace and record address 
unit control block 

virtual common communications table 
volume identification 

virtual page address 

virtual storage 
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Summary of Amendments 


Summary of Amendments 
for LY28-1189-2 
As Updated July 12, 1985 


This revision contains new and updated matenal in support of MVS/XA System 
Product Version 2, release 1.3, and includes the following: 


@ For AMDPRDMP: 
— several new AMDPRDM*P control statements: JES3, SADMPMSG, and 
TCAMMAP. 
— diagrams of the Verb Exit Processing section are now in table form 
— minor technical and editonal revisions 
@ For AMDSADMP: 
— the addition of three new modules: 
— AMDSAXKSM 
— AMDSAFCM 
— AMDSADCM 
@ numerous changes to HIPOs and extended descriptions 
@ minor technical and editorial revisions 


Summary of Amendments 
for LY28-1189-1 
as Updated January 31, 1984 


This is a major revision of LY28-1189-0. It contains new and updated information 
in support of MVS/XA System Product and includes the following: 


@ For AMDPRDMP: 
— support for the ForMAT and SUMMARY control statements have 
changed 
@ For AMDSADMP: 
— support for the Magnetic Tape Subsystem Display 
— support for the 3290 console 
@ minor technical and editonal changes 
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Summary of Amendments 
for LY28-1189-0 

as Updated March 31, 1983 
by TNL LN28-0786 


This technical newsletter contains new and updated material in support of 
MVS/XA System Product and includes the following: 


@ A revised description of monitor call event handling in GTF. 


@ A description of modifications to SADMP that support the 3350 DASD with 
a 3380-11 control unit. 


@ Two new control statements in AMDPRDMP: MTRACE and DAEDATA. 


@ Minor technical and editorial changes. 
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Chapter 1. Generalized Trace Facility (GTF) 


Section 1: Introduction 


The Generalized Trace Facility (GIF) traces selected system and application 
program events and records the data for later formatting and printing by the 
AMDPRDMP service aid program. GTF functions independently of the system 
trace facility. If system trace is active when GTF is started, system trace remains 
active. Starting GTF does not alter the status of system trace. 


Invoking and Controlling GTF 


The operator invokes GTF as a system task with a START command specifying 
the cataloged procedure. (This procedure has the memberna:ne of GTF and Is 
included in SYS1.PROCLIB at system generation.) The operator controls GTF 
processing via parameters in the START command and the TRACE options. The 
information supplied in the START command includes the following: 


@ MODE — Defines whether the trace data is recorded in the GTF address 
space (internally) or in an external data set defined by the IEFRDER DD 
statement in the cataloged procedure. 


@ TIME — Provides the option for every logical trace record to be time-stamped 
with the TOD clock value at the time the record is placed into the buffer. 


@ DEBUG — Permits GTF to either attempt recovery or terminate from errors 
it encounters while building a trace record. 


@ BUF — Specifies the number of trace buffers which GTF makes available for 
the ABDUMP/SNAP, SVC dump, or AMDSADMP program to include in 
dump output. 


@ The operator may also specify parameters to override JCL parameters in the 
cataloged procedure or values for symbolic parameters in the cataloged 


procedure. 


For a description of the START command, its GTF parameters, and the GTF 
cataloged procedure, refer to Service Aids. 
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GTF obtains the trace options from the operator, or, if a SYSLIB DD statement 
is provided in the cataloged procedure, from the specific member of 
SYS1.PARMLIB. The following options may be specified. 


ASIDP — requests that GTF tracing be limited to specific address spaces 
(which the user is prompted to supply). 


CCW — requests recording of channel programs and associated data for start 
subchannel and resume subchannel operation and I/O interruptions. 


CCWP — requests recording of channel programs using specific channel 
program trace options (which the user is prompted to supply) for start 
subchannel and resume subchannel operations or I/O interruptions or both. 


CSCH — requests recording of data for clear subchannel operations. 


DSP — requests recording of comprehensive data (or minimal data if SYSM is 
also specified) for all task, LSR, or SRB dispatch events. 


EXT — requests recording of comprehensive data for all external 
interruptions. 


HSCH — requests recording of data for halt subchannel operations. 


IO — requests recording of data for all I/O interruptions except 
program-controlled interruptions (PCI’s). 


IOP — requests recording of data for I/O interruptions on specific devices 
(which the user is prompted to supply). 


JOBNAMEP — requests that GTF tracing be limited to specific jobs (which 
the user is prompted to supply). 


MSCH — requests recording of data for modify subchannel operations. 


PCI — requests recording of data for all intermediate status interruptions. If 
IOP or SYSP is also specified, only intermediate status interruptions on the 
specified devices will be recorded. 


PI — requests recording of comprehensive data for all program interruptions. 


PIP — requests recording of comprehensive data for program interruptions 
with specific interruption codes (which the user 1s prompted to supply). 


RNIO — requests recording of comprehensive data (or minimal data if SYSM 
is also specified) for all basic transmission units (BTU’s) received by 
ACF/VTAM. 


RR — requests recording of comprehensive data (or minimal data if SYSM is 
also specified) for all entries to functional error recovery routines such as 
STAE/ESTAE routines. 
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GTF Hooks 
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SIO, SIOP — If you request the SIO or SIOP option, GTF processes your 
request as a request for SSCH or SSCHP. 


SLIP — requests recording of data specified by a SLIP trap with a tracing 
action when it matches or when any trap is checked with SLIP DEBUG mode 
specified. 


SRM — requests recording of comprehensive data (or minimal data if SYSM 
is also specified) for all entries to the system resources manager. 


SSCH — requests recording of data for all start subchannel and resume 
subchannel operations. 


SSCHP — requests recording of data for start subchannel and resume 
subchannel operations on specific devices (which the user is prompted to 


supply). 
SVC — requests recording of comprehensive data for all SVC interruptions. 


SVCP — requests recording of comprehensive data for specific SVC numbers 
(which the user is prompted to supply). 


SYS — requests recording of comprehensive data for all external 
interruptions, program interruptions, recovery routines, and supervisor call 
interruptions. SYS causes recording of all I/O interruptions, start subchannel 
and resume subchannel operations, clear subchannel operations, halt 
subchannel operations, and modify subchannel operations. 


SYSM — requests recording of minimal data for the events listed under SYS. 


SYSP — requests recording of comprehensive data for specific system events 
(which the user is prompted to supply). 


TRC — requests recording of data for all events associated with the trace task 
itself. 


USR — requests that all data passed to GTF via the GTRACE macro 
instruction be recorded in the trace data set. 


USRP — causes GTF to build an internal table of the user event identifiers 
(EIDs) that the user specifies. The TEST parameter of the GTRACE macro 
tests whether or not tracing is active for the specified EIDs. 


After the operator starts GTF and selects the trace options, GTF waits for an 
event that requires GTF tracing, GTF is notified of such an event by a hook from 
another routine. Hooks are issued by IBM users, IBM components, first level 
interruption handlers, the I/O supervisor, the dispatcher, the recovery/termination 
manager, and the system resources manager. GTF also receives hooks to indicate 
that trace data is to be included in a dump; these hooks are issued by ABEND or 
SVC DUMP. 
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Two macro instructions provide the hooks into GTF: 


@ GTRACE — which ts a trace hook issued by users and IBM components to 


cause GTF to write their data in the GIF output. Events traced by the 
GTRACE macro will use an Event Identifier (EID) from one of the three 
ranges listed below: 


1. Q000 — 1023 user events 
2. 1024 — 1535 reserved for program products 
3. 1536 — 4095S reserved for IBM components and subsystems 


EIDS in the first range are available for general use by all GIF users. EIDS 
in the second and third ranges are reserved. 


HOOK ~— which 1s issued by system routines to notify GIF of an event to be 
traced or of the need for trace data for a dump. 


Both of these macro instructions generate the monitor call (MC) instruction (see 
Section 6, a maskable interruption). 


GTF Output 


GTF builds two kinds of records: 


Trace records — which contain information about system events. If the 
SYSM (system minimal) option 1s in effect, the trace record is similar to that 
built by the system trace facility. If the trace option is other than SYSM, the 
trace record contains more comprehensive data about the system event. 


Control records — timestamp and lost block/event records. The timestamp 
record is the first record in every block; it identifies the time of day and date 
when the first trace entry was placed in the block. The lost block/event 
record contains information about events that were missed. 


When trace mode is internal, the records are maintained in 4096-byte buffers in 
variable blocked format. When mode is external, the trace records are written in 
the external data set (either tape or direct access) defined by the IEFRDER DD 
statement in the cataloged procedure. When the end of the data set on a direct 
access device is reached, writing continues at the beginning of the data set. The 
data will be in variable blocked format with a blocksize of 4096 bytes. 


Formatting and Printing GIF Output 


The AMDPRDMP service aid program formats the GIF output for printing. 
The EDIT control statement in AMDPRDMP provides: 


Data reduction for GTF output. 
Selectivity of data from the trace output data set. 


An interface to user- or component-supplied formatting routines for data 
recorded via the GRACE macro instruction. 
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For a detailed description of the EDIT function of AMDPRDMP, refer to the 
“Print Dump (AMDPRDMP)” chapter in this publication. 


While GTF is active and SDATA=TRT is in effect, the ABEND/SNAP routine 
formats and prints trace records related to the dumped address space. The 
records formatted are those from the n most recent GIF buffers, where n is the 
number specified with the BUF = keyword on the START command. 
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Section 2: Method of Operation » 


This section describes how GTF collects and manages data about system events. 
As shown in GTF Diagrams 1 and 2, the description begins with an overview of 
GTF, then describes the stages of the overall processing listed below. Finally, it 
describes the processing of the monitor call-routing facility. 


GTF initialization. 

Hook processing. 

Trace record buffering and blocking. 
GTF-wniter processing. 

GTF/dump interface. 

Error recovery. 

GTF termination. 


Reading Method of Operation Diagrams 


Method of operation diagrams are arranged in an input-processing-output layout: 
the left side of the diagram contains the data that serves as input to the processing 
steps in the center of the diagram, and the nght side contains the data that is 
output from the processing steps. Each processing step is numbered; the number 
corresponds to the verbal description of the step in the extended description. 
While the processing step in the diagram is in general terms, the corresponding 
text is a specific description that includes a cross-reference to the code for the 
processing. 
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Diagram 1 
GTF Overview 


Diagram 2 Diagram 4 Diagram 6 Diagram 8 


Program Record Blocking GTF/Dump Termination 
Initialization and Buffering Interface 


Diagram 3 Diagram 5 Diagram 7 Diagram 9 


Hook Processing GTF-Writer Error Recovery MC Event Router 
Processing Processing 


Key to Method of Operation (MO) Diagram Symbols 


Entry into processing Look for corresponding numbers in text 


Look for blow-up of item on same page 


Flow of Control 


Look for corresponding-lettered blow-up 
on same page 


Data Transfer 


Braces to denote related items 


Pointer to or address of 


See referenced diagram for detailed 
description 


Reference to data 
Reference to another diagram 


Figure 1-1. Key to Method of Operation Diagrams for GTF 
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GTF Diagram 1. GIF Overview (Part 1 of 2) 


Input ViaSTART Command _ Process Output 





START Command 
START GTF [MODE=,TIME= 


Initialize GTF: 
,DEBUG=,BUF=] YS 1 














— 


EXEC[PARM=] 
MC Tables ; 


SYS1.PROCLIB 
Console 






@ Select GTF options 





GTF 
Tables: 


See MO 2 
for Details 


—- 


From MC @ Request MC support using 
SETEVENT service 










Routing 
Facility 





(MO 9) 


Filter Tables 


Control Register 8 
on Each'CPU 


See MOs 3—5 
for Details 
Control Record 







SYS1.PARMLIB 2 Process a hook: 


or 


GTRACE... 





@ Trace hook 
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User and 


System Data 





Areas e ABEND/SNAP/SVC Dump 
Interface hook 














STOP Command. See MOs 4-6 —] 
| sropete || | 3 Terminate GTF for Details Copy of ; 
GTF Buffers 
See MO8 
for Details 
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GTF Diagram 1. GTF Overview (Part 2 of 2) 


Extended Description 


1 


Module Label 


The GTF procedure resides in SYS1.PROCLIB. The 
operator invokes GTF by use of aSTART command. 


e Four parameters (MODE, TIME, DEBUG, and BUF) 


may be specified in the START GTF command or 
they may be specified in the EXEC statement in the 
GTF procedure. The options for the trace phase of 
GTF may be specified by the operator from the 
console or they may be included in a member of 
SYS1.PARMLIB. GTF obtains storage for tables in 
which it places information about the selected 
options. 


Before tracing can begin, GTF requires monitor call 
(MC) routing-facility support. The MC routing 
facility is an extension of the program first-level 
interruption handler (PFLIH). GTF issues the 
SETEVENT macro instruction to request MC support. 
The SETEVENT service constructs MC tables for the 
events GTF will trace and turns on the corresponding 
class bits in control register 8 for each active CPU. 
See Section 6 for a description of the SETEVENT 
macro instruction. If selective event tracing is in 
effect, GTF constructs filter tables. 


2 When a program issues a HOOK or GTRACE macro 


instruction (see Appendix A) for an event to be 


traced, the MC routing facility passes control to GTF. 
GTF’‘s processing depends on the kind of hook received: 


Trace hooks notify GTF of an event that may be 
traced by GTF. GTF collects data about the event 
from user and/or system data areas, then records the 
data in trace records. 


Dump interface hooks from ABEN D/SNAP/SVC 

Dump request trace data to be saved for adump. GTF 
builds a control record and saves a copy of the current 
buffer contents. During dump processing, ABEND/ 
SNAP/SVC Dump issues the AHLREAD macro instruc- 
tion for GTF to pass the buffer copies to the dump 
program. 


GTF records reside either in the GTF address space or in 
an external data set, depending on the MODE option in 
effect. 


C 


Extended Description 


3 The operator terminates GTF via a STOP command. 
(See MO 8 for GTF termination. Abnormal termina- 
tion is described in MO 7.) 


Module 


Label 


(C 
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GTF Diagram 2. Program Initialization (Part 1 of 8) 


Via START 
Input Command 


ENQ AHLONAME, 
AHLRNAME €E,SYSTEM 
CVT 


CVTGTFST 


STOP ECB 


liegister 1 EXEC 
PARMLIST 








Process 


1 Terminate if GTF already active 


2 issue ESTAE for error protection 


3 issue SETEVENT to request monitor 
call support 


4 Obtain and initialize GTF tables 


e Primary control table 
(GTFPCT) 


e initialization table (INITDATA) 


Output 








Message AHLO13l 








To the 
Operating 
System 






CVT 


CVTGTF 


MCCEQEA 





GTF MCQE 





GTFPCT 
GTEPCTID 
STOP ECB 
PCT PCITB 


INITDATA 


FINITID 


PC] TABLE 









ico 
i EXEC Parms| 
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GTF Diagram 2. Program Initialization (Part 2 of 8) 
Extended Description Module Label 


1 Assoon as GTF receives control, it ensures that it is AHLGTFI| 
not already in operation from a previous START 

command. It issues an ENQ macro instruction for a 

major resource of VS2TRACE and a minor resource of 

GTF. If the resources are unavailable, or GTF initializa- 

tion is in process or GTF is active, GTF issues message 

AHLO13] to the console and returns control to the 

system. GTF then terminates. 


2 = GTF provides error protection for initialization AHLGTFI 
via an ESTAE macro instruction. 


3  GTF requests MC support via the SETEVENT AHLGTFI 
macro instruction. Asa result of SETEVENT SETEVENT 
processing, an MC queue element (MCQE)}) for GTF is service 


established. It is chained off the MC control element 
(MCCE) from MCHEAD. 


4 = GTF obtains space in SQA for its primary control AHLGTFI 

table, the GTFPCT. A flag is set in the GTF audit 
field (AUDITWRD), indicating that GTFPCT has been 
obtained. This field tracks GTF processing and deter- 
mines what actions are taken if the GTF initialization 
ESTAE recovery routine receives control. GTF also 
obtains storage in subpool zero for the initialization 
data area INITDATA. If PC] and CCW or CCWP are 
requested, GTF builds the PCI table. It clears the 
tables and places EBCDIC identifiers in each table. 
GTF stores a pointer to the STOPECB in GTFPCT and 
stores pointers to the command input buffer (CIB) and 
the PARM field of the AHLGTF EXEC statement in 
INITDATA. If either area could not be obtained, GTF 
issues message AHL130I and returns control to the 
system. 
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GTF Diagram 2. Program Initialization (Part 3 of 8) 


INITDATA 







LNGTH Subfield 
in EXECPARM 


Length of START Length of EXEC 
Command Statement 
Parameter Field Parameter Field 







CIBDATA 


or EXECPARM 


PARMS 


or 


Operator Reply 





Process Output 





5 Scan START command and EXEC 
Statement for user options: 


e Initialize with default values GTFPCT 
or 
. GTFSTAT 
One is Nonzero yw e Initialize with user-supplied 


values 


MODE 


TIME = 
YES, no } 


DEBUG = 
Invalid {YES. No} 
Cone Parameter, WTOR 
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GTF Diagram 2. Program Initialization (Part 4 of 8) 
Extended Description Module Label 


fF GTF checks the CIBDATLN field of the CIB to AHLSCAN 

to determine whether there are parameters in the 
START command. If the field is nonzero, GTF obtains 
the parameters from the CIBDATA field and sets the 
appropriate option bits in the GTFSTAT field of the 
GTFPCT. If the CIBDATLN is zero, there are no param- 
eters in the START command, so GTF checks the LNGTH 
subfield of the EXCPARM field in INITDATA. If it is 
nonzero, GTF obtains parameters from the EXEC state- 
ment and sets the appropriate bits in GTFSTAT. If an 
invalid parameter is encountered, GTF issues a WTOR for 
valid options. If parameters were not supplied via the 
START command or EXEC statement, the GTF defaults 
are in effect. 
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GTF Diagram 2. Program Initialization (Part 5 of 8) 


Input Process Output 








INITDATA GTFPCT 


















——_— PARMDCB GTFSTAT GTFLOAD 

SYST. Fo LO ed LL G Obtain trace options. 

PARMLIB ICTFELG1 GTFOPTS GTFEIDL 
or EID LIST 

GTFPCT 






7 Build EIDLIST/CLASSLIST and 
RANGETAB using selected trace 
event data. 


GTFOPTS 


EPALIST 

Entry Point 

of Handler 
EIDLIST CLASSLIST 
RANGETAB 


GTFPCT 


) Handlers for 
Filter Events 






RANGETAB 


Storage Range 





for Each Event Handler 





MCOQE for GTF MCCLE 
| rl 
| — | 
! Event 
Handler 


MCEE 
EID i Event Handler 





8 Issue SETEVENT for selected trace 
options. 


FL 
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GTF Diagram 2. Program Initialization (Part 6 of 8) 
Extended Description Module Label! 


G GTF determines the source of trace option input: AHLCTL1 
either SYS1.PARMLIB or the console. AREADJFCB 

is issued for the SYSLIB DD, and if PARMLIB input is 

indicated, the ICTPLIB flag in INITDATA is set to 1 and 

SYS1.PARMLIB input is read for the options. If input is 

to come from the console or if the SYS1.PARMLIB data 

set open is unsuccessful, the ICTPLIB flag is set to O and 

GTF issues AHL100A to obtain the options from the con- 

sole. In either case, GTF obtains the options and sets the AHLTSCN 

appropriate bits in GTFOPIND field of INITDATA. It 

also sets the PCTCATFE bits in GTFPCT. GTF resolves 

specification of mutually exclusive options. (See 

Service Aids for a discussion of GTF options.) If the 

GTFOPIND bits indicate SVCP, SYSP, SSCHP, IOP, PIP, 

ASIDP, JOBNAMEP, or CCWP, GTF prompts the operator AHLTPMT 

for selected trace events and specific trace options. After AHLTCTL 

all options and filter events have been obtained, GTF issues AHLT103 

message AHL1031. If selective tracing is in effect, GTF 

uses the EBCDIC tables to build filter tables or masks. 

The addresses of the filter tables are placed in GT FPCT 

except when AS|IDP or JOBNAMEP are in effect. |f 

ASIDP or JOBNAMEP is in effect, the filter tables for 

ASIDP or JOBNAMEP (not the addresses of the filter 

tables} are placed in the GTFPCT. 


7 = GTF determines which event handlers are required AHLGTFI (MCQEINIT) 

based on the options in effect as indicated by the 
GTFOPTS bits. Starting and ending addresses of the 
required modules are determined via the entry point list 
(EPALIST). GTF constructs an EIDLIST which contains 
EIDs of events to be traced and the entry points of the 
associated event handler modules. GTF also constructs 
the RANGETAB which contains starting and ending 
addresses of the event handler modules. From this table, 
it determines the range of storage required to fix GTF in 
storage. This range is set in FIXTAB which is passed as a 
parameter on the PGFIX macro instruction. The storage 
for FIXTAB is obtained from SQA since it is required to 
free storage of GIF termination. 


8 GTF issues the SETEVENT macro instruction with AHLGTFI (MCQEINIT) 
ADD specified as the action so that the appropriate AHLSETEV 

MC tables will be constructed for all EIDs and classes of 

events to be traced. 
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GTF Diagram 2. Program Initialization (Part 7 of 8) 
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GTF Diagram 2. Program Initialization (Part 8 of 8) 


Extended Description Module Label 


Q = GTF attaches the writer subtask to initialize AHLGTFI 
the trace record blocking and buffering areas. 
(GTF determines which of three writers to attach based 
on whether trace data will be maintained internally or 

written to tape or to direct access.) The writer sub- 
task issues GETMAIN macro instructions, first for 

an SRB to be used in buffering, then for the record- 
blocking areas (GFTBLOKs). The SRB has the 
addresses of the GTF ASCB and GTF'’s writer-subtask 
TCB. The GTFBLOKs are obtained one at a time 

in SQA. (If the size of real storage is 768K, GTF 
obtains only 3 GTFBLOKs.) The first block to be 
filled is initialized with a use count and with the CVTTZ 
value. A pointer to it is set in the CURRBLOK field 
of the GTFPCT. Remaining blocks are all chained 

off the first block. The buffers and buffer control 
blocks (GTFBCBs) are obtained from subpools 5 

and 6 respectively. The buffers required for the GTF 
history queue are chained (via pointers in the 
associated BCBs) from the HQHEAD field in GTFPCT. 
Each GTFBCB contains a use count which indicates 
the number of queues the GTFBCB Is on, This use 
count is never less than 1, since buffers not currently 
in use are on the empty queue. 


AHLCWRIT 
AHLIWRIT 
AHLWWRIT 


GTF also attaches and initializes the subtask which AHLGTFI 
performs asynchronous operator communication during AHLWTASK 
unrecoverable errors in trace processing. 


10 GTF reissues the SETEVENT macro Instruction AHLTMON 

specifying ACTIVATE to enable tracing after 
successful completion of the above. The SETEVENT 
service obtains work/save areas (MCAWSA) to be used 
by the MC routing facility. If the CCW option was 
requested, the SETEVENT service obtains AHLCCWWK. 
it also initializea the class mask in control register 8 for 
each active CPU. 


AHLSETEV 


C 


Extended Dascription Module Label 


11. While GTF tracing is active, GTF waits on a list of AHLTMON 

ECBs which cause GTF termination when posted. 
These are the STOP ECB, termination ECB, the 
writer/WTASK error ECB, and the two ATTACH ECBs 
for the writer and WTO subtasks. The CVT bits which 
indicate that GTF is active are set on. GTF then receives 
control from the program check interruption handler 
whenever a hook is issued for an event enabled for tracing. 
Asynchronously, the writer and WTO subtasks wait on the 
|/O ECB and WTO ECBs, respectively. When either of 
these are posted, the writer and/or the WTO subtask 
perform the requested function. 


Note: During initialization, GTF frees storage for its 
temporary tables when they are no longer needed. 
These include INITDATA, EIDLIST, the device tables, 
and RANGETAB. If the STOP ECB is posted during 
initialization, the program terminates after freeing all 
resources. 
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GTF Diagram 3. Hook Processing (Part 1 of 20) 
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GTF Diagram 3. Hook Processing (Part 2 of 20) 


Extended Description 


When the MC routing facility passes control to GTF for 
hook processing, GTF first determines if the event 
belongs to a specified set of jobs or address spaces. If so, 
then GTF performs event filtering {if selective tracing is in 
effect) or it gathers data to construct a record for the 
hook. The record is built in the GTF MC application 
work/save area (MCAWSA). The GTF issues an 
AHLSTACK macro instruction to cause the record 

prefix to be added and the record to be placed in a 
GTFBLOK. Full GTFBLOKs are copied into buffers. 
(See Diagram 4 for details.) In the case of a control hook 
from ABEND or from SVC Dump, the placement of the 
record in a block causes GTF to immediately copy the 
block to a buffer whether the block was full or not. 


1 Thei/o supervisor issues a HOOK macro instruction 
for three types of |/O interruptions: 


@ For end-of-sense interruption processing, it uses an 
EID of IECEOS. 


@ For intermediate status interruption processing, it 
uses an EID of JECPCI. 


@ For I/O interruptions with a valid UCB, it uses an EID 
of IECIO2. 


If interruptions for only certain devices are to be traced, 
GTF checks the I/O filter table to determine whether 
the current interruption is for one of the selected devices. 


SYSM 
SYS 
e If TRACE = SYSP , GTE builds an 1/O 
lO trace record. 
IOP 


CCW Io 
e If TRACE = CCWP and TRACE -{\0 } ,GTE 
builds CCW trace records in addition to the |O trace 


record. 


Information for the records comes from various system 
data areas; the diagram shows these areas. The formats of 
the output records are in the ‘Data Areas’ section of this 
chapter. 


Module Label 


AHLTSELF AHLTSELF 
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AHLSBLOK AHLSFEOB 
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GTF Diagram 3. Hook Processing (Part 3 of 20) 
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GTF Diagram 3. Hook Processing (Part 4 of 20) 
Extended Description Module Label 


2 =Thel/O supervisor issues a HOOK macro instruction 

with an EID of I|ECSSCH for all SSCH events in the 
lOS SSCH subroutine. If SSCH events for only certain 
devices are to be traced, GTF checks the SSCH filter table 
to determine whether the current event is for one of the 
selected devices. 


SYSM 
SYS 

e If TRACE =<¢ SYSP GTF builds an SSCH trace AHLTFCG SSTRCE 
SSCH record, RSTRCE 
SSCHP 


AHLTCCNG AHLTCCWG 


e lf TRACE = {ecw Senet , 


cowry and TRACE = {eecn 
GTF builds CCW trace records in addition to the SSCH 
trace record. 


Information for the records comes from various system data 
areas; the diagram shows these areas. The formats of the 
output records are in the ‘Data Areas’ section of this chapter. 
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GTF Diagram 3. Hook Processing (Part 5 of 20) 


Input Process Output 
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CVT ASVT 
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IOSLEVEL 
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GTF Diagram 3. Hook Processing (Part 6 of 20) 

Extended Description 

3  Thel/O supervisor issues a HOOK macro instruction 
for clear subchannel and halt subchannel events: 


@ For clear subchannel event processing, it issues an EID 
of [ECCSCH. 


@ For halt subchannel event processing, it issues an EID 
of [|ECHSCH. 


SYSM 
SYS 
If TRACE =< SYSP 4, GTF builds a CSCH/HSCH trace 
CSCH jf record. 
HSCH 


Information for these records comes from various system 
data areas; the diagram shows these areas. The formats of 
the output records are in the Data Areas section of this 
chapter. 
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GTF Diagram 3. Hook Processing (Part 7 of 20) 


Input Process Output 


Hook From 1/O Supervisor 


HOOK EID = IECMSCH 
EID = 6104 


SA Registers 4 Build record for MSCH event MSCH Trace Record 
PSACPUSA RO Condition e MSCH trace record 


Code 
CVT R2 AlosB 
RasvT R3 4scHiB2 


ASVT 
AASCB SCHIB 
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lOSOPT2 
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GTF Diagram 3. Hook Processing (Part 8 of 20) 
Extended Description Module Label 


4 The 1/O supervisor issues a HOOK macro instruction 
with an EID of IECMSCH for all MSCH events: 


SYSM 
SYS . 

e If TRACE = SYSP , GTFE builds an MSCH trace AHLTFCG MSTRCE 
MSCH record. 


information for these records comes from various system 
data areas; the diagram shows these areas. The formats 
of the output records are in the Data Areas section of 
this chapter. 
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GTF Diagram 3. Hook Processing (Part 9 of 20) 


Input 


HOOK EID = IECRSCH 


PSA Registers 


RO Condition 
Code 





JOBNAME 


lIOSDURID 
IOSLEVEL 


UCBLEVEL 
UCBCHAN 





Process 


EID = §106 


5 Build record for RSCH event 
e@ RSCH trace record 





Output 


RSCH Trace Record 
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GTF Diagram 3. Hook Processing (Part 10 of 20) 


Extended Description Module Label 


5 = Thel/O supervisor issues a HOOK macro instruction 
with an EID of [|ECRSCH for all RSCH events: 


SYSM 
SYS 
e If TRACE =4 SYSP >, GTE builds an RSCH trace AHLTFCG RSTRC 
SSCH _ ] record. 
SSCHP 


Information for these records comes from various system 
data areas; the diagram shows these areas. The formats of 
the output records are in the Data Areas section of this 
chapter. 
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GTF Diagram 3. Hook Processing (Part 11 of 20) 


EID = 8100, 8200 


Input Process 


Hook from VTAM 
HOOK EID = ISPTIO1 


ISPTIO2  Y 6 Build record for RNIO event: 


ith 
RCBREGS ether 


R1 R2 ASVT 
BTUA | AsIDA ASVTENTL 
e Minimal trace record 


SA ; 
of or 
PSAC PUSA | 
- COCOCOCOCOCNCSCSSSSsC@-s Comprehensive trace record 


me] 





ASCB 
Jobname | ASCBJBNI 


Hook From SVC Jnterruption Handler 
HOOK EID = IEASVCH 


FLCSVCN — — — —— —— — 


EID = 1000 


7 If SVC filtering in effect, determine 
whether event selected for tracing 


Build record for program 
interruption: 


P LCCA 


sors 


SA 


either 


Variable 
Data 4 


e Minimal trace record 
or 
or 





@ Basic comprehensive trace record 





or 
Old TCB RB CDE . ; 
@ Unique comprehensive trace 
ML [CDE Name record 


ASCB 


jobname 


Variable Data parmlist 





c 


Output 


Minimal RNIO Record 
Comprehensive RNiO Record 


SVC Minimal Trace Record 
SVC Basic Comprehensive 
Trace Record 

SVC Unique Comprehensive 
Trace Record 
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GTF Diagram 3. Hook Processing (Part 12 of 20) 


Extended Description Module Label 


G6  VTAM issues a HOOK macro instruction with an EID 

of ISPTPIO1 or ISPTPIO2 for every input or output 
BTU. GTF builds one of two records depending on the 
GTF options in effect: 


e If MODE=INT or TRACE=SYSM, RNIO, the program AHLTVTAM AHLACFV 
builds an RNIO minimal trace record. 


@ If TRACE=RNIO, GTF builds an RNIO comprehensive AHLTVTAM AHLACFV 
trace record. 


Information for the records comes from various system data 
areas, shown in the diagram. The output record formats 
are described in the ‘‘Data Areas’’ section. 


J = The SVC interruption handler issues a HOOK macro 
instruction with an EID of |EASVCH for all SVC 
interruptions. If interruptions for only certain SVC num- 
bers are to be traced, GTF checks the SVC filter table AHLTSYFL AHLFSVC 
to determine whether the current interruption is for a 
selected number. GTF builds one of three records, 
depending on the GTF options in effect and the SVC 


number: 
e If TRACE=SYSM, GTF builds an SVC minimal trace AHLTSYSM AHLSVC 
record. 
SYS 
SYSP . 
e If TRACE = SVC , GTF builds a basic SVC AHLTSVC AHLTSVC 
SVCP 


comprehensive trace record. 


e In addition to the basic comprehensive trace informa- AHLTSVC AHLTSVC 
tion, for certain SVC numbers GTF adds unique 
information to the record. 


Information for the records comes from various system 
data areas, shown in the diagram. The output record 
formats are described in the ‘‘Data Areas” section. 
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GTF Diagram 3. Hook Processing (Part 13 of 20) 


Input Process 


Hook From Dispatcher. 


HOOK EID = IEADISP1,IEADISP2 
[EADISP3, IEADISP4 








PSA LCCA 
CPUSA 
ASC 
__ 
Indicator 


2) 











Aicca TCB 
I Tae 
Physical CPU 


Interruption 
Code 


TQE 
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PSA LCCA 
CPUID 
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EID = 0001, 0002, 0003, 0004 


8 Build record for TCB, LSR, SRB, 
or SVC prolog dispatching event 


either 


@e Minimal trace record 


or 


@ Comprehensive trace record 


EID = 6201 


Q Build record for external 
interruption 


either 


e Minimal trace record 


@ Comprehensive trace record 


Output 


DSP Minimal Trace Record 


DSP Comprehensive Trace Record 


EXT Minimal Trace Record 


EXT Comprehensive Trace Record 
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GTF Diagram 3. Hook Processing (Part 14 of 20) 


Extended Description 


8 The dispatcher issues a HOOK macro instruction 
when dispatching a unit of work: 


e For an SRB, it uses an EID of [EADISP1. 
e For an LSR, it usesan EID of IEADISP2. 
e Fora TCB, it uses an EID of JEADISP3., 


The SVC exit prolog issuesa HOOK macro instruction 
with an EID of |EADISP4 when dispatching a task. 
GTF builds one of two records: 


e if TRACE=SYSM, DSP, GTF builds a DSP minimal 
trace record. 


e If TRACE=DSP, GTF builds a DSP comprehensive 
trace record. 


Information for the records comes from various system 
data areas shown in the diagram. The output record 
formats are described in the ‘Data Areas” section. 


9 The external FLIH issues a HOOK macro instruction 
with an EID of |EAEINT for all external interrup- 
tions. GTF builds one of two records: 


e If TRACE=SYSM, GTF builds an EXT minimal trace 


record. 
SYS 
e If TRACE={ SYSP? , GTF builds an EXT compre- 
EXT 


hensive trace record. 


Information for the records comes from system data 
areas, shown in the diagram. The output record formats 
are described in the ‘’Data Areas” section. 


Module Label 


AHLTXSYS AHLDSP 


AHLTPID AWHLTDSP 
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GTF Diagram 3. Hook Processing (Part 15 of 20) 


Input Process 


Hook From PFLIH 


HOOK EID =tEAPINT, lEATINT 
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PSA 
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___ 
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Hook From User 
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EID = 6101, 6200 


10 if Pl filtering in effect, 
determine whether event 
selected for tracing. Build 


record for program interruption: 


either 
e Minimal trace record 
or 


e Comprehensive trace record 


EID = Exxx 
11 Record paged-in user data in 
GTF buffers 


or 


Set return code for paged-out 
data 


or 


Set return code for invalid 
data 





Output 


Minimal PI Trace Record 


Comprehensive Pl Trace Record 


User Record 


m8) 


15 
X’20' 
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15 
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GTF Diagram 3. Hook Processing (Part 16 of 20) 
Extended Description 


1Q The PFLIH issues a branch-type HOOK macro 
instruction with an EID of |IEAPINT for all program 
interruptions with codes 1-17, 19. |t uses an EID of 
(EATINT for PI 18. If interruptions for only certain 
interruption codes are to be traced, GTF checks the Pl 
filter mask to determine whether the current interruption 
was selected for tracing. GTF builds one of two records: 


e if TRACE=SYSM, GTF builds a PI minimal trace 


record. 
SYS 
e If TRACE= el , GTF builds a Pl comprehensive 
PIP 


trace record. 


Information for the records comes from system data areas 
shown in the diagram. The output record formats are 
described in the ‘Data Areas” section. 


11. The IBM user or component issues a GTRACE macro 
instruction to have GTF place a user/component record 


in the GTF buffers. 


e if TRACE=USR or TRACE=USRP is in effect, GTF 
accepts the record. GTF checks the validity of the 
data passed by the user/component and moves it to 
the GTF buffer. 


If the user specified the PAGEIN=YES keyword on the 
GTRACE macro instruction, code generated by expan- 
sion of the macro causes the trace data to be paged in. 

if the user specified the PAGEIN=NO keyword on the 
GTRACE macro instruction and a page fault occurs in the 
access of user data, GTF sets a return code of X‘20' and 
no record is built. 
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GTF Diagram 3. Hook Processing (Part 17 of 20) 
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13 Build record for RR event: 
either 


e@ Minimal trace record 
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e@ Comprehensive trace record 
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Cc 
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GTF Diagram 3. Hook Processing (Part 18 of 20) 
Extended Description 


12 The system resources manager issues a HOOK macro 
instruction each time it is entered. GTF builds one of 
two records: 


e if TRACE=SYSM, SRM, then GTF builds an SRM 
minimal trace record. 


e If TRACE=SRM, then GTF builds an SRM compre- 
hensive trace record. 


13 The recovery/termination manager issues a HOOK 
macro instruction on return from each FRR, STAE, 

and ESTAE recovery routine. GTF builds one of two 

different records, depending on the options in effect: 


e If TRACE=SYSM, then GTF builds an RR minimal 
trace record. 


e if TRACE=RR, then GTF builds an RR comprehensive 
trace record. 


14 The ABEND/SNAP routine issues a HOOK macro 
instruction if SDATA=TRT was specified. GTF 

builds a control record specifying that buffer contents 

are to be saved for dumping. See Diagrams 4 and 6. 


15 The SVC Dump routine issues a HOOK macro 
instruction if SDATA=TRT was specified. GTF 

builds a control record specifying that buffer contents 

are to be saved for dumping. See Diagrams 4 and 6. 
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GTF Diagram 3. Hook Processing (Part 19 of 20) 
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GTF Diagram 3. Hook Processing (Part 20 of 20) 
Extended Description Module Labal 


16 The SLIP processor (IEAVTSLP) issues a HOOK macro 
instruction for: 


e ASLIP event that has been successfully matched with an 
enabled SLIP trap and either TRACE or TRDUMP is the 
specified action for the trap. 


e@ ASLIP trap that is in DEBUG mode and is inspected by 
the SLIP processor as a result of any SLIP event. 


GTF builds one of these records: 


e If the EID=X‘4004’, GTF builds a record containing AHLTSLIP AHLSLSTD 
standard information obtained by GTF from the data 
areas shown in the diagram. 


e If the EID=X‘*4005', GTF builds a record containing AHLTSLIP AHLSLSTD 
SLIP standard information followed by the informa- AHLSLUSR 
tion that is (1) requested by the user via the TRDATA 
parameter of the SLIP command, or (2) supplied by 
IEAVTSLP when a SLIP trap is DEBUG mode. 


e If the EID=X’4006', GTF builds a record containing AHLTSLIP AHLSLUSR 
information requested by the user via the TRDATA 
parameter of the SLIP command. 


if the user-defined data requested is greater than 136 bytes 
(including langth fields) for a standard/user record, or 
greater than 256 bytes (including length fields) for a user 
record, the record is truncated. 


The output record formats are described in the ‘’Data 
Areas’ section. 
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GTF Diagram 4. Trace-Data Blocking and Buffering (Part 1 of 4) 
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GTF Diagram 4. Trace-Data Blocking and Buffering (Part 2 of 4) 


Extended Description Module Label 


GTF manages the flow of trace data using both record- 
blocking areas (GT FBLOKs) and buffers (GTFBUFRs). 
Buffers are accessed through their buffer contro! blocks 
(GTFBCBs). 


Since multiprocessing will cause concurrent construction, 
blocking, and buffering of trace records, GTF uses a series 
of use counts and locks to serialize the use of these areas. 


GTF also maintains queues of buffers for different 
purposes. These are: 


@ History queue — The n most recent GTF buffers where 
n is specified by the BUF=parameter to control the 
amount of trace data ina dump. See Service Aids for 
information on the specification of n. 


e® Writer queue — Full buffers to be written to an 
external data set or released. 


e Release queue — Buffers for which aPGRLSE must 
be issued before they are placed on the empty queue. 


e Empty queue — Buffers available to receive blocked 
trace records. 


@ Current queue — Buffer currently being filled. 


@ SLE queue — Buffers being heid for a dump routine. 


1. GTF checks the length of the constructed trace AHLSBLOK 
record. {The length is in the MC application work/ 

save area (MCAWSA),) If there is insufficient space for 

the constructed record in the current GTFBLOK, the next 

empty GTFBLOK on the chain is made the current block- (AHLSFEOB) 

ing area. The CURRBLOK pointer in the GTFPCT is 


updated. 


If all the GTFBLOKs are full, GTF updates the lost-events (AHLSFEOB) 
count since the trace data in the record will not be saved. 
Then, GTF schedules the buffering function as in Step 3. 


C 


Extended Description Module Label 

2 ~ Before moving the record into the block, GTF AHLSBLOK 
increments the use count in the block to prevent an 

attempt to buffer the data during the blocking process. 

GTF reserves space in the block for the record by adding 

the length of the new record to the length of already- 

blocked data (BLOKLEN). This allows other records to 

be entered into the block concurrently. (For concurrent 

entry of records, the BLOKUSE count is incremented 

accordingly. Buffering only occurs when the count is 0.) 

GTF moves the record from the construction area in 

MCAWSA to the GTFBLOK. Then it decrements the use 

count. 


3  GTF determines whether buffering is already scheduled AHLSBLOK 
by checking the GTFSSBB value in GTFPCT. If this 

value is negative, buffering is not currently scheduled so 

GTF issues the SCHEDULE macro instruction. 


4  GTF checks the pointer to the empty buffer queue AHLSBUF 
(EQHEAD) inthe GTFPCT. If there are no empty 

buffers, GTF posts the writer’s work ECB so that buffers 

can be made available. (See diagram 5 for writer processing.) 


Buffering terminates until reenabled by the writer. 
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GTF Diagram 4. Trace-Data Blocking and Buffering (Part 3 of 4) 
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G Save a copy of the history queue 
if required for a dump request. 







GTFPCT 
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GTFBUFR 
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pe / Check for more full blocking areas 
to buffer. 
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8 Continue buffering 






GTFPCT 
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Allow buffering to be 
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GTF Diagram 4. Trace-Data Blocking and Buffering (Part 4 of 4) 
Extended Description Module Label 


5 silf buffers are available on the empty queue and there 
is a full GTFBLOK, GTF makes the first buffer the 
current one (COHEAD). It copies the GTFBLOK into 
the buffer and places it on the end of the history queue 
(QTAIL). It then decrements the use count in the 
GTFBLOK. For every buffer placed on the end of the 
history queue, one must be removed from the head. The 
HQHEAD pointer indicates the buffer to be removed. The 
buffer removed is placed on the release queue for later page 
release by the GTF writer. From the release queue, the 
buffers are replaced on the empty queue. 


6 GTF scans the buffer for a record indicating arequest AHLSBUF 
for trace data for ABEND/SNAP or SVC Dump. 

For every such record, GTF builds a save list elernent 

(SLE) and decrements the save count. All the buffers cur- 

rently on the history queue are also placed on the SLE 

to save them for the dump. After this, GTF removes the 

address of the buffer in the current queue pointer 

(COHEAD). 


7 +For any other full GTFBLOKs, the buffering process AHLSBUF 
is repeated. 


8  GTF also posts the writer subtask to indicate a buffer AHLSBUF 
has been added to the write queue. 
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Diagram 5. GTF-Writer Processing (Part 1 of 2) 


Via ECB 
Posting 


Process 





1 Free buffers already written. 
















GTFPCT 
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BCB 






Buffer 





Work ECB 


[ 


GTFPCT 


2 Write out full buffers if trace is 
external 


or 


Place buffers on release queue. 


3 Issue PGRLSE and put buffers 
on empty queue. 


gw 4 Ensure record blocking is pro- 
ceeding smoothly. 


5) Wait for another posting of a 
writer ECB. 





Output 
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GTFPCT 


ROQHEAD 
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Use Count = 0 I 
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Diagram 5. GTF-Writer Processing (Part 2 of 2) 
Extended Description Module Label 


AHLCWRIT 
AHLWWRIT 


1 ‘For external trace mode, the GTF writer subtask 
checks the ECB in the CECB pointed to by 
NEXTCHK. If it has been posted, a CHECK macro 
instruction js issued, and then the writer decrements the 
usecount field in the associated buffer contro! block 
(GTFBCB). If the use count Is then zero, the writer puts 
the GTFBCB on the release queue and increments the 
count. GTF will subsequently issue a PGSER FREE macro 
instruction for the buffer page. The NEXTCHK pointer is 
updated to the chain address in the DECB. When the 
address in NEXTCHK is the same as the address in 
NEXTWART, there are no more DECBs to check. 


2 If the ECB was posted because buffers are full, pro- 

cessing depends on whether an external data set is 
defined (external trace mode). If there is not external 
data set, the writer removes the GTFBCB from the write 
queue. If there is an external data set, the writer removes 
a full buffer from the write queue and places it on an 
available DECB and issues a WRITE macro instruction 
with the buffer address as the write record. 


AHLIWRI-T 
AHLCWRIT 
AHLWWRIT 


C 


Extended Description 


For direct-access output, the writer checks the ECBs 

for a code of X‘'40’ in the first byte. This code indicates 
that the end of the data set has been reached and wrap- 
Ping is required. In this case, the next write is to the 
beginning of the data set. 


3 The writer moves all buffers from the release queue 

to the empty queue. It issues a PGRLSE macro 
instruction for each buffer. It then checks the empty 
queue (EQHEAD) for available buffers. If there are 
insufficient buffers on the queue, the writer issues the 
GETMAIN macro instruction to obtain 4K buffer stor- 
age from subpool 6 and equivalent BCB storage from sub- 
pool 5. If the buffering routine has been disabled because 
of the lack of available buffers, the writer reenables it. 


4 ~==The writer checks the lost record count. If the count 
is 400 or greater, a blocking area (GTFBLOK) may 
need to be replaced. 


5 After its processing, the writer subtasks reenters the 

wait state. Should the next ECB posted be the 
writer termination ECB, all queue activity is quiesced 
before termination. See MO 7 for details. 


Module 


AHLWWRIT 


AHLCWRIT 
AHLIWRIT 
AHLWWRIT 


AHLCWRIT 
AHLIWRIT 
AHLWWRIT 


AHLIWRIT 
AHLCWRIT 
AHLWWRIT 


Label 
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GTF Diagram 6. GTF/Dump Interface (Part 1 of 2) 


From 
ABEND/SNAP 
or SVC Dump 


Input Process 





AHLREAD DATAAREA=..., 
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1 Request transfer of trace data 
to area for dump 





PSA ASCB 
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dumping 


Trace Data 





r= 


3 Pass one prefixed buffer page 
SLE Buffer at a time to dump 


ABEND/SNAP 





4 Pass one buffer at a time to 
Data Base Data Area dump 


[| || 5 Notify dump routine request 


has been satisfied 


c c 


Output 


SVC Dump 


SVC Dump 


ABEND 


nim 


Return 


Parmlist 
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-AHLREADR 
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Current TCB 


SOA Data Area 





Page of Control Blocks 


SOA Data Area 


GTF Data 


Data Area 
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GTF Diagram 6. GTF/Dump Interface (Part 2 of 2) 


Extended Description Module Label 


To provide trace data for ABEND/SNAP or SVC Dump, 
GTF saves the required data on a queue (SLE) until it can 
be dumped. This function is requested by HOOKs with 
EIDs of |EAABOF and IEASVCD for ABEND/SNAP and 
SVC Dump, respectively. 


1. When ABEND/SNAP or SVC Dump requires the 
trace data for a dump, it issues the AHLREAD macro 
instruction and then waits on an ECB. Expansion of 
AHLREAD causés a parameter list to be constructed in 
the data area provided by ABEND/SNAP or SVC Dump. 
An SRB to schedule the trace data transfer is constructed AHLREAD 
in subpool 245. Then the SRB is scheduled. However, Macro 
if the address space being dumped is the GTF address instruction 
space, no trace data will be passed to the dump program. 
This is indicated by a POST code for no data available. 


2 Foran SVC Dump request, GTF passes pages con- AHLREADR 
taining control blocks required by AMDPRDMP’s 

edit function to format trace data, The page is prefixed 

with eight bytes of data required by AMDPRDMP. GTF 

passes one page of data for each AHLREAD macro 

instruction issued. 


3 When SVC Dump requests subsequent pages of trace AHLREADR 
data, GTF builds the 8-byte prefix and passes the 

contents of a 4K buffer. If the address contained in the 

SLE is for a GTFBCB, GTF gets the buffer address from 

the GT FBCB. 


4 ~ GTF copies the buffer contents one at a time from AHLREADR 
the GTF address space to an area in SQA specified 
by ABEND/SNAP. 


fF The ECB for the asynchronous data transfer is posted. AHLxWRIT 
The SAVELIST elements are then released. The 

records are then formatted by ABEND/SNAP (module 

IGCOFOS5A). User records are formatted if the user/ 

component has provided a formatting routine for use by 

the dump service or the edit function of AMDPRDMP. 

If the user formatting routine cannot be loaded, 

ABEND/SNAP dumps these records in hexadecimal. 
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GTF Diagram 7. Error Recovery (Part | of 4) 
From 


RTM 
Input Process 


Error in GTF Initialization 


1] Request SVC Dump of GTF 





SETEVENT GTF, FREE |___———S——S—S—S—S—SC YW 2. Free GTF's MC support 


GTFPCT 
ATTCHECB 
AUDITWRD —g %3 Detach writer and WTO subtasks 
if attached. 
GTFPCT 
[ 4. Free storage obtained by GTF 


Or 
FIXTAB 


[| 


DEQ Macro Instruction YY FE, Free GTF resource 








Step 5 


Return 


Output 


CVTGTFST=0 
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GTF Diagram 7. Error Recovery (Part 2 of 4) 


Extended Description 


Error in GTF initialization 


1. When an error occurs during GTF initialization, the 
recovery/termination manager (RTM) passes control 
to the GTF initialization ESTAE routine. The ESTAE 
routine requests an SVC Dump of GTF and issues message 
AHLO16l to inform the operator of the error. 


2 ThenaSETEVENT macro instruction specifying the 

FREE action is issued to free MC routing-facility sup- 
port. See Section 6 for a description of the SETEVENT 
macro instruction. 


3 «After freeing MC routing-facility support, GTF posts 
the writer subtask for termination. |t waits for the 

writer to complete its termination and then detaches the 

writer. The WTO subtask is detached in the same manner. 

If the GTFPCT tracking field (AUDITWRD) indicates that 

either subtask has not been attached yet, no processing 

for that subtask is performed. 


4  GTF frees any SQA storage it has obtained. It also 

issues the PGSER macro instruction to free all fixed 
storage in LPA occupied by the filter/gather/build rou- 
tines. This storage is pointed to by FIXTAB. 


5 «The GTF resource is then freed by issuing the DEQ 
macro instruction. GTF returns contro! to the sys- 
tem with a non-zero return code. 


Module 


AHLGTFI 


AHLGTFI 


AHLTMON 
or 
AHLGTFI 


AHLTMON 
or 
AHLGTFI 


AHLTMON 
or 
AHLGTF! 


Label 


AHLIESTA 


AHLIESTA 


AHLTESTA 
or 
AHLIESTA 


AHLTESTA 
or 
AHLIESTA 


AHLTESTA 
or 
AHLIESTA 
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GTF Diagram 7. Error Recovery (Part 3 of 4) 





From 
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Return 
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e Recoverable error - put 
asterisks in record field 


and 


SETRP Macro Instruction [-——__» Continue building record 


e@ Unrecoverable error - 
disable handling for 


SETEVENT,... DISABLE... [> YY that event 


and 


Request a dump of GTF 


MC Routing To Wait for Next 
Facility Trace Event 





Output 


MCAWSA 


Current Trace Record 
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Address to 


Continue 
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GTF Diagram 7. Error Recovery (Part 4 of 4) 


Extended Description Module Label 


Error in filter/gather/build routine 


G sf alternate CPU recovery (ACR) allows, GTF retries Event handler‘s error 
the error-causing processing. This is indicated by the —_ routine 

STAE diagnostic work area (SDWA) passed to GTF by 

RTM. 


7 éi(lf the error occurred in a service, for example, record 

blocking (AHLSTACK routine), GTF passes control 
to the recovery/termination manager for termination of 
GTF. 


8 !f DEBUG=YES was specified in the START command, 
GTF passes control to the recovery/termination man- 
ager for enabled termination of GTF. 


QsIf anerror in building a trace record occurred and Event handler’s error 
DEBUGE=NO is in effect, GTF processes as follows: routine 


@e Recoverable error — the record build routine puts an 
error indicator in the record field that caused the pro- 
blern and places an address in the SDWA (via the 
SETRP macro) to point to the place where processing 
will resume. 


e Unrecoverable error — GTF disables the event handler 
by issuing the SETEVENT macro instruction specifying 
DISABLE as the action. ASVC Dump is requested. 
Finally, message AHLI181 is issued specifying the 
event that is disabled. GTF then returns control to the 
MC routing facility to wait for other trace events. How- 
ever, if all events are disabled, GTF returns control to 
RTM to terminate GTF. 


Note: When GTF returns contro! to RTM for termination, 
percolation to the MC routing facility’s error recovery 
routine occurs. This routine schedules on SRB which posts 
the enabled portion of GTF (the task monitor) for termina- 
tion. See MO 8 for details of termination processing. 
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GTF Diagram 8. GTF Termination (Part 1 of 2) 


Via STOP Command 
or Error Processing 


Input Process Output 








oe Ss Ss Wait for all trace 1/0 and WTOs 


to complete. 
AHLxWRIT 
ECB 





External Trace/Message 
Data Sets 


2 Free MC routing facility tables 
via SETEVENT 


GTFPCT 





BLOKLIST 


s GTF-BLOKs i f s GTF-BCBs 
s GT F-BUFs 


3 Free buffers and related control 
blocks 


GTFPCT 


s Event Handlers 
4 Free all fixed storage occupied 


by GTF 





BK Free GTF resource Return 
to System 
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GTF Diagram 8. GIF Termination (Part 2 of 2) 
Extended Description 


1 Before terminating, the writer subtask completes 

1/O for eny filled buffers. GTF also completes 
any in-process transfer of data for ABEND/SNAP or 
SVC Dump. The asynchronous WTO subtask also com- 
pletes its processing. 


2 GTF issues the SETEVENT macro instruction 
specifying the FREE function to free GTF’s 
MCOQE and the event and class directories. 


3. The record-blocking areas, buffers, and buffer con- 

trol blocks are freed. The SRB used to schedule 
buffering is freed. Then, GTF frees the writer and WTO 
subtask by issuing the DETACH macro instruction. 
Then it frees the message table (WMSGTAB) and the 
SRB it used for scheduling. 


4 = GTF uses the GTFPCT pointers to the event handling 
routines to unfix the storage required for the routinas. 


GTF then frees the storage required by GTFPCT. 


5 Finally, GTF issues a DEQ macro instruction for the 


GTF resource and returns to the system. 


Module 


AHLCWRIT 
AHLIWRIT 
AHLWWRIT 


AHLTMON 


AHLCWRIT 
AHLIWRIT 
AHLWWRIT 


AHLWTASK 


AHLTMON 


Label 
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GTF Diagram 9. MC Event Handling (Part 1 of 4) 
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GTF Diagram 9. MC Event Handling (Part 2 of 4) 
Extended Description Module Label 


The MC interruption handling routine (AHLMCIH) 
receives control to trace events from the program 
check first-level interruption handler (PFLIH). 


1 = The MC interruption handling routine determines AHLMCIH 
whether routine is active by checking the MCHACT 

flag in MCHEAD. (The MCHEAD is described in System 

Data Areas.) Unless the flag has been set to 1 by the 

SETEVENT service, control is immediately returned to 

the caller. 


2 ‘If the MCINCTL flag in the work/save area MCRWSA AHLMCIH 
is on, recursion through AHLMCIH has occurred. 
In this case, control is returned to the PFLIH. 


3 The MC interruption handling routine sets the AHLMCIH 
MCINCTL recursion flag in the MCRWSA. It also 

places the address of its error recovery routine on the 

FRR stack via SETFRR. 


4 The two-byte EID of the event to be routed is calcu- AHLMCER 
lated as follows: 


e MC instruction issued — the onedigit class and three- 
digit code from the instruction are taken from the MC 
hardware locations and combined to form the EID for 
the hook. The EID is then placed in the MCREID field 
of the MCRWSA. 


@ Branch-HOOK macro issued - AHLMCIH simulated the 
MC instruction by obtaining the class and code from the 
NOP instruction following the BALR to AHLMCIH. It 
placed the values in low storage as if a monitor call had 
been issued. The EID value is calculated and placed in AHLMCER 
the MCRWSA as above. 


WA] 50 Ajsodoig — s[Bliaj8]Q] pasuaory] 


WA JO S[B9} BJA) pa}d11Jsay SulwjuOy 


NO] SPly adtIalag sINnooaYyory pepucixg/SAW pC-| 


S861 7861 hop wal ysuddoD © 7-681I-8ZAT 


GTF Diagram 9. MC Event Handling (Part 3 of 4) 
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Output 
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GTF Diagram 9. MC Event Handling (Part 4 of 4) 


Extended Description Module Label 


The event router issues a CMSET for the home AHLMCER 
(PSAAOLD) address space for any non-PFLIH entries 

to GTF or for a PFLIH entry when PASID is not equal to 

HASID. The event router determines the routines to 

receive control for the event by using the E!D directory 

(MCED) and the class directory (MCCD). The MC control 

element (MCCE) contains pointers to both directories. 

Before using the MCCE and directories, AHLMCER 

increases the use count in MCHEAD so these tables will 

not be released while the event is being handled. 


The MCED is searched first for all routines to handle the 
event. ALHMCER uses the EID value from MCRWSA 

in the search, If an MCEE (event element) specifying the 
EID is not found, the class directory (CCD) is searched 
for routines to handle the event class. The class (calcu- 
lated from the EID in the MCRWSA) is used as an index 
into the directory. 


If jobname and/or address filtering need to be done, 
AHLTSELF is called. If the ASID or jobname is not 
selected for tracing, event routing is terminated. The 
event router passes the following information to the rou- 
tine to build the record: 


@ Address of the MC queue element associated with the 
routine. (There is one MCQE for each MC user, for 
example, GTF.) 


e@ Address of a work/save area (MCAWSA) for the event 
handler. 


e@ Address of MCQEAT (for GTF, this is the address of 
the GTFPCT). 


After the routine has completed processing, the event 
router resets the MCINFGBR toQO. The EID link field 
(MCEEEIDL) is checked to determine whether another 
MCEE or MCCLE exists for this event. If so, control is 
passed to the indicated routine as above. 


C 


Extended Description Module Label 


G The event router issues a CMSET to reset to the AHLMCER 
caller’s environment if necessary, The event router 
attempts to decrease the use count in MCHEAD using a 
CDS instruction. (f the attempt is unsuccessful, 
AHLMCER determines whether the pointer to the MCCE 
in MCHEAD has been changed. lf it has, a new set of rou- 
ting tables are in effect. In this case, the old use count 
from MCHEAD has been saved in the old MCCE, 
AHLMCER decreases this count, and if the result is O, 
the tables associated with the old MCCE may be freed. 
This is done by scheduling the already initialized SRB 
located in the MCCE. 


The event router resets the recursion flag (MCINTL) and 
returns to the caller of AHLMCIH. |f an error occurs in 
an event handler and the event handler does not recover, 
the associated MCQE for the MC user is disabled, and that 
application is terminated. Other MC users still receive 
control for their specified events. |f an error occurs while 
the event router is in control, the event router is termi- 
nated and message AHL132I is issued. All MCQEs are 
terminated in this case. 


AHLMCER. 
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Section 3: Program Organization Jo 


This section contains the following items which describe the organization of GTF. 


A description of GTF’s use of storage during trace processing (see 
Figure 1-2). 

A list of the modules that are loaded for each trace option specified. 
Module calling sequences for GTF functions. 

A list of GTF load modules and the object modules they contain. 

A cross-reference table of module and data areas. 


MCRWSA 
MCAWSA 
GTFBLOKs 
MC tables 


Pageable link pack area 


data gathering routines£ 
AHLSBLOK 
AHLSBUF 
AHLMCER! 
SETEVENT service 


GTF address space - private area 


AHLTMON 
AHLxWRIT x = C,l,or W 
AHLWTASK 


Subpool 6 





GTFBCBs! 


Subpool $ 
GTFBUFRx 


Nucleus 


AHLMCIH? 
MCHEAD? 





| Fixed while GTF is active 
2 Always fixed 


Figure 1-2. GTF Storage During Tracing 
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C Trace Modules Loaded for Each Selected Option 


C 


Trace Option 


Trace Modules 


ASIDP None 

CCW, CCWP AHLTCCWG 

CSCH AHLTFCG 

DSP without SYSM AHLTPID 

DSP with SYSM AHLTSYSM, AHLTXSYS 

EXT AHLTEXT 

HSCH AHLTFCG 

IO AHLTFCG 

IOP AHLTFCG, AHLTSYFL 

JOBNAMEP None 

MSCH AHLTFCG 

PCI None 

PI AHLTPID 

PIP AHLTPID, AHLTSYFL 

RNIO without SYSM AHLTFOR 

RNIO with SYSM AHLTSYSM, AHLTXSYS 

RR AHLTFOR 

SLIP AHLTSLIP 

SRM without SYSM AHLTFOR 

SRM with SYSM AHLTSYSM, AHLTXSYS 

SSCH AHLTFCG 

SSCHP AHLTFCG, AHLTSFL 

SVC AHLTSVC 

SVCP AHLTSVC, AHLTSYFL 

SYS AHLTFCG, AHLTSVC, AHLTPID, AHLTFOR, AHLTEXT 

SYSM AHLTSYSM, AHLTFCG 

SYSP AHLTFCG, AHLTSVC, AHLTPID, AHLTFOR, AHLTEXT, 
AHLTSYFL 

TRC None 

USR, USRP AHLTUSR 


Figure 1-3. Trace Modules Loaded for Each Selected Option 


Module Calling Sequences for GTF Functions 


The following maps show sequential flow of GIF modules. Each map indicates 
the active modules for a specific function and describes the operations performed 
by those modules. Entry point names are also provided where they may differ 
from the module names. Figure 1-4 explains the design of sequence maps. 


For more detailed descriptions of the functions, see the diagrams in Section 2: 
Method of Operation. A reference to the corresponding diagram accompanies 


each map. 
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Single Path Flow Alternate Path Flow 
Calling Module Calling Module 
Module A Module A 
Module A! Module B 
Module A2 Module B! 


Module B (ENTRY1) 


The calling module first calls A, The calling module determines whether 
which then calls A! and A2. to call A or B for this operation. If B 
When A returns, the caller passes receives control, it calls B! before 
control to B at entry point returning to the caller. 

ENTRY]. 


Figure 1-4. Example of Calling Sequence Map 


GTF Task Processing 
Initialization - Includes initialization for GTF task and for GTF trace processing. 


Task monitor - Acknowledges STOP on termination ECBs while GTF is active. 


Hook Processing 


MC event-routing facility - Gives control to GTF when a trace event occurs. 


= Filter/gather/build routines - Build GFT records for selected events. Request record 
blocking/buffering via AHLSTACK macro instruction. 


Record-blocking routine - Stacks trace records into blocking area. Issues 


SCHEDULE macro instruction for buffer-copying routine 
when blocking area is full. 


Buffer Processing 


Asynchronous buffering routine - Copies contents of full blocking area to buffer. Issues POST 
| macro instruction for GFT writer to manage buffer queues. 


POST 


L_ Writer routine - Manages buffer queues. Writes trace data to output data set (external trace 
mode only). 
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Initialization (Diagram 2) 


AHLGTFI - Enqueues GTF resource, sets up ESTAE for initialization, requests MC support, 
obtains and initializes GTFPCT, AHLPCITB, and INITDATA. Transfers control to 
AHLTMON after initialization. 


AGLSCAN- - Obtains GTF options from START command on EXEC statement or uses 
defaults. Sets options bits in GTFPCT indicating the START command 
options. 


AHLTCTLI - Controls obtaining and scanning of trace options. 

-AHLTSCN - _ Scans options from SYS1.PARMLIB or console. Sets 
GTFOPIND of INITDATA. Resolves conflicts of mutually 
exclusive options specified. 

AHLTPMT -_ Builds and issues message AHLT1031. 


AHLT103 Obtains selective trace events from SYS1.PARMLIB or the 


console. Builds EBCDIC device tables for filtering. 


AHLTTAB - Converts EBCDIC device tables to filter tables (masks). 
LOAD 
Load appropriate record-building routines. 
ATTACH 
AHLIWRIT 
AHLWWRIT / Initializes blocking areas and buffers, opens DCB if external trace, 


AHLCWRIT | completes ECBLIST, gets SRB to schedule buffering, loads and fixes 
AHLSBLOK and AHLSBUF. 


ATTACH 
AHLWTASK ~~ -_ Sets up the message table (WMSGTAB) and an SRB to schedule WTO, 
builds ECBLIST. 
XCTL 
| AHLTMON - Performs final initialization; issues SETEVENT to: enable MC support, 


get CPU-related work areas (chained from LCCA), and initialize control 
register 8 on each active CPU. Waits on the ECB list. Posts writer and 
WTO ECBs for termination processing. Detaches writer and WTO 
subtasks. Cancels MC support. 


SVC, EXT, RR, PI Minimal Record Building (Diagram 3) 
AHLMCER 


AHLTSELF ~~ - Determines if an event occurred within a specified address space or job. 


AHLSVC, AHLEXT 
AHLTSYSM AHLPI, AHLFRR, Builds a minimal! record in MCAWSA for the 
AHLSTAE event; issues AHLSTACK macro instruction to 
prefix the record and to cause record blocking. 


record-blocking routine (via AHLSTACK macro instruction) 
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RNIO, SRM, DSP Minimal Record Building (Diagram 3) ) 
AHLMCER - Determines that an event handled by AHLTXSYS has occurred. 


AHLTSELF - Determines if an event occurred within a specified address space or job. 


AHLDSP 

AHLTXSYS AHLSRB Builds a minimal record in MCAWSA,; issues 
AHLSRM AHLSTACK macro instruction to prefix the record and 
AHLRNIO to cause record blocking. 


record-blocking routine (via AHLSTACK macro instruction) 


DSP, PI Comprehensive Record Building (Diagram 3) 


AHLMCER - Uses hook EID and the event/class directories (MCED and MCCD) to 
determine that an event handled by AHLTSYFL or AHLTPID has occurred. 


AHLTSELF~ - Determines if an event occurred within a specified address space or job. 


AHLTSYFL_ - If selective tracing for PI is in effect, determines whether this event is selected 
by using the filter tables in GTFPCT. 


AHLTDSP 

AHLTPID AHLTLSR Builds a comprehensive record in MCAWSA for the event; 
AHLTPI issues AHLSTACK macro instruction to prefix the record 
AHLTSRB and to cause record blocking. 


record-blocking routine (via AHLSTACK macro instruction) 


RNIO, RR, SRM Comprehensive Record Building (Diagram 3) 





AHLMCER - Determines that an event handled by AHLTFOR has occurred. 


AHLTSELF~ - Determines if an event occurred within a specified address space or job. 


AHLTFRR 

AHLTFOR AHLTSRM Builds a comprehensive record in MCAWSA for the event; 
AHLTSTAE issues AHLSTACK macro instruction to prefix the record 
AHLTRNIO and to cause record blocking. 


record-blocking routine (via AHLSTACK macro instruction) 


EXT Comprehensive Record Building (Diagram 3) 

AHLMCER - Determines that an event handled by AHLTEXT has occurred. 
AHLTSELF  - Determines if an event occurred within a specified address space or job. 
AHLTEXT _ - Builds a comprehensive record in MCAWSA for the event; issues 

AHLSTACK macro instruction to prefix the record and to cause record 


blocking. 


record-blocking routine (via AHLSTACK macro instruction) 
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1/0, SSCH, CSCH, HSCH, MSCH, RSCH Record Building (Diagram 3) 


AHLMCER - Determines that an event handled by AHLTFCG, AHLTSYFL, or 
AHLTCCWG has occurred. 


AHLTSELF  - Determines if an event occurred within a specified address space or job. 


AHLTSYFL_ - If selective tracing for 1/O and/or SSCH is in effect, determines whether this 
event is selected by using the filter tables in GIFPCT. 


AHLTFCG | AHLTFCG 


RECSTACK 


Builds a comprehensive record in MCAWSA for the event; 
issues AHLSTACK macro instruction to prefix the record 
and to cause record blocking. 








record-blocking routine (via AHLSTACK macro instruction) 
AHLTCCWG - Accesses the proper address spaces through a CMSET; traces the channel 
program; builds a trace record in the MCAWSA for the event, issues an 
AHLSTACK macro instruction to prefix the record and to cause record 
blocking. 


record-blocking routine (via AHLSTACK macro instruction) 


SVC Comprehensive Record Building (Diagram 3) 


AHLMCER - Determines that an event handled by AHLTSYFL or AHLTSVC has 
occurred. 
AHLTSELF  - Determines if an event occurred within a specified address space or job. 


AHLTSYFL_ - If selective tracing for SVC is in effect, determines whether this event is 
selected. If so, passes control to AHLTSVC. 


AHLTSVC Builds a comprehensive SVC record; issues AHLSTACK macro instruction 
to prefix the record and to cause record blocking. 


record-blocking routine (via AHLSTACK macro instruction) 


User/Component Record Building (Diagram 3) 

AHLMCER - Determines that an event handled by AHLTUSR has occurred. 
AHLTSELF  - Determines if an event occurred within a specified address space or job. 
AHLTUSR (AHLTUSR) ~ - Builds a record of data received from a user/component after 

checking validity of the data. Issues AHLSTACK macro 


instruction. 


(AHLTUSRE) - Ifa page fault occurred in gathering data, indicates the condition 
to be handled by code generated by GTRACE macro instruction. 


record-blocking routine (via AHLSTACK macro instruction) 


Save Hook Control Record Building (Diagram 3) 


AHLMCER - Determines that an event handled by AHLTDIR has occurred. 
AHLTSELF _ - Determines if an event occurred within a specified address space or job. 
AHLTDIR - Builds a save hook control record for trace data requested by 


ABEND/SNAP/SVC Dump. Issues AHLSTACK macro instruction. 


record-blocking routine (via AHLSTACK macro instruction) 
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SLIP Trace Record Building (Diagram 3) ) 
AHLMCER - Determines that an event handled by AHLTSLIP has occurred. 
AHLTSLIP | AHLSLSTD Builds a trace record in MCAWSA for the event; issues 








AHLSLUSR AHLSTACK macro instruction to prefix the record and to 


cause record blocking. 


record-blocking routine (via AHLSTACK macro instruction) 


Record Blocking and Buffering (Diagram 4) 


Record build routine - Builds trace record in MCAWSA, then issues AHLSTACK macro 
instruction which causes record blocking and buffering. 


AHLSBLOK (AHLSBLOK) - Places trace record with prefix in a blocking area 
(GTFBLOK) in SQA. 


(AHLSFEOB) - Swaps to an empty GTFBLOK when a blocking area 
becomes full; keeps track of events lost while waiting for a 
GTFBLOK. Schedules SRB for the buffering routine 
(AHLSBUF) when a GTFBLOK is full or a hook from 
ABEND/SNAP/SVC Dump is received. 


SCHEDULE 
| anrsBur - Moves blocked trace data to buffer (GTFBUFR); manages buffer 
queues through buffer control blocks (GTFBCBs). Builds save list 
element (SLE) if the blocked data contains a save-hook control 
record for ABEND/SNAP/SVC Dump. Post writer. 
GTF Writer (Diagram 5) J 
AHLSBUF - Post GTF writer after copying a GIFBLOK to a buffer. 
POST Note: only one writer module is loaded per GTF trace execution. 


AHLCWRIT  - Tape writer; writes buffers from the write queue to output tape; maintains 
interna! history queue. 


AHLIWRIT _ - Internal mode writer; maintains internal history queue of trace data. 


AHLWWRIT - Direct-access writer: writes buffers from the write queue to direct-access data 
sel; maintains internal history queue. 
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GTF - Dump Interfaces (Diagram 6) 
SVC Dump - Requests buffers with data related to ASID of failing address space. 
or 
ABEND/SNAP (IGCOFOSA) - Provides interface with GTF. Issues AHLREAD macro instruction 
which causes (via scheduling an SRB) trace data to be transferred 


from GTF’s address space to SQA. Formats records. Calls for user 
format appendage or dumps user records in hexadecimal. 








AHLREADR is scheduled via AHLREAD macro instruction - Queues request for one page of 
trace data to be copied to 
SQA. 


AHLxWRIT_ - Copies a page of data to SQA. Schedules SRB to return to 
AHLREADR to post the dump program. Before filling the last 
request associated with a dump, the writer removes BCBs from the 
SLE. 


WTO for Disabled Event (Diagram 7) 
Filter/gather/build error-recovery routine - If a disabling error occurs. calls for disabled event message. 


AHLWTO (AHLWTOMD) - Fills in table for message AHL118I informing operator of 
disabled event. Schedules SRB for WTO subtask. 


SCHEDULE 


AHLWTASK (AHLWPOST) - Posts AHLWTASKS’s ECB to write the message. 
(AHLWTASK) - Writes error message AHL1 18]. 


Termination Processing (Diagram 8) 


AHLTMON - Controls termination of GTF when STOP ECB or abnormal-end ECB is posted. Issues 
| SETEVENT to free MC routing tables. Notifies writer and WTO subtasks of 

termination. Detaches subtask. Frees fixed storage. AHLTMON issues DEQ to free 
GTF resource. 


-_ AHLxWRIT -_ Ensures all I/O to externa] data set is complete before freeing buffers, 
blocking areas, and related contro] blocks. Deletes AHLSBLOK and 
AHLSBUF. 








AHLWTASK -_ Frees message table area. 


MC Event Handling (Diagram 9) 


Program first level 
Interruplion handler - Passes contro] to the MC interruption handler when MC interruptions or 
other checks occur. 


AHLMCIH 
AHLMCIHB 
AHLMCIHC 
AHLMCIH AHLSTCLS 
AHLVCCR8 
AHLUTEST 


AHLMCER - calculates EID value for the hook and uses the event directory 
(MCED) and class directory (MCCD) to route control to each routine 
which handles this event type. 


record-building routine 


LY28-1189-2 © Copyright IBM Corp. 1982 1985 Chapter 1. Generalized Trace Facility (GTF) 1-63 


Contains Restricted Materials of IBM 
Licensed Materials — Property of IBM 


Section 4: Data Areas 


This section contains descriptions of the data areas built and used by GTF and by 
the MC event handler. Refer to Data Areas for detailed formats of the data 
areas. This section also contains formats of the records built by GTF during 
tracing. 


The GTF tables described are as follows: 


Buffer control block (GTFBCB). 
Initialization data area (INITDATA). 
Primary control table (GTFPCT). 
Range table (RANGETAB). 

Save list element (SLE). 

CCW trace work area (AHLCCWWK). 
PCI work area (AHLPCITB). 


The MC event handler tables are as follows: 


Application work/save area (MCAWSA). 
Base table (MCHEAD). 

Class directory (MCCD). 

Class element (MCCLE). 

Control element (MCCE). 

Queue element (MCQE). 

Router work/save area (MCRWSA). 


The GTF record formats are as follows: 


Control records (lost block, lost event, save hook, and timestamp). 
Minimal trace records (DSP, EXT, PI, RNIO, RR, SRM, SVC). 
Comprehensive trace records (DSP, EXT, PI, RNIO, RR, SRM, SVC). 
Trace records (I/O, CSCH, HSCH, MSCH, RSCH, SLIP, SSCH). 


GTF Data Areas 


Buffer Control Block (GTFBCB) 


Created by: AHLxWRIT (x is C, I or W depending on the GIF mode 
specification and/or output device). 


Updated by: AHLSBUF. 


Use: A temporary data area that contains indicators of the GTF options 
obtained during initialization. The table is freed at the end of initialization. 
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PCI Work Area (AHLPCITB) 


Created by: AHLGTFI. 
Updated by: AHLTCCWG. 


Use: A table that contains command codes, flags, and channel program starting 
addresses for PCI interrupts. 


Primary Control Table (GT FPCT) 


Created by: AHLGTFI. 


Updated by: AHLxWRIT, AHLREADR, AHLSBLOK, AHLSBUF, 
AHLSCAN, AHLTCTLI, AHLTEXT, AHLTFOR, AHLTMON, AHLTPID, 
AHLTPMT, AHLTSCN, AHLTFCG, AHLTSVC, AHLTSYFL, AHLTSYSM, 
AHLTTAB, AHLTUSR, AHLTXSYS, AHLWTASK, AHLTSLIP. 


Referenced by: AHLREADR, AHLSTACK, AHLT103, AHLWTO, IGCOFOSA. 
Use: Contains the majority of control information required for GTF operation. 


This includes pointers to buffer queues, indicators of options in effect, pointers to 
SRBs for scheduling services, pointers to the filter tables. 


Range Table (RANGETAB) 


Save List Element (SLE) 


Created by: AHLGTFI. 
Updated by: AHLGTFI. 


Use: A temporary data area for GTF initialization that contains starting and 
ending addresses of each event-handler routine required for tracing. From this 
table, the range of storage required for page fixing 1s determined. The table is 
freed at the end of initialization. 


Created by; AHLxWRIT (x is C, I or W depending on the GTF mode and/or 
output device). 


Updated by: AHLSBUF. 


Use: Contains the control information related to a request by ABDUMP/SNAP 
or SVC Dump for trace data. This information includes the TCB address for a 
dumped task, the ASID of a dumped address space and pointers to the buffers 
containing the required data and/or related buffer control blocks. 
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MC Event Handling/Data Areas 


Application WCCk/Save Area (MCAWSA) 
Created by; AHLSETEV, AHLVCON. 
Updated by: AHLMCER, AHLSBLOK, AHLSETD, AHLSTACK, AHLTDIR, 
AHLTEXT, AHLTFOR, AHLTPID, AHLTFCG, AHLTSVC, AHLTSYSM, 
AHLTUSR, AHLTXSYS, AHLVCOFF, AHLWTO, AHLTSLIP, AHLMCIH. 
Use: Used by the data-gathering routines for register save areas, temporary work 
space, and record building. Records are moved, as they are completed, from this 
data area to the blocking areas (GIFBLOKs). 

Base Table (MCHEAD) 


Created by: Assembled as part of the MC interruption-handler routine 
(AHLMCIH), which is resident in the nucleus. 


Updated by: AHLSETEV, IEAVNP17. 


Referenced by: AHLMCER, AHLREADR, AHLSETD, AHLVCON, 
IGCOFOSA. 


Use: Contains basic control information for the MC event handler. The 
information includes the address of the current (active) control element (MCCE), 
a use count indicating the number of routines using this set of tables, and the 
current active class mask in control register eight. 

CCW Trace Work Area (AHLCCWWK) 
Created by: AHLSETEV 
Updated by: AHLTCCWG 
Use: A temporary work area for CCW trace that contains flags, bit switches, 
addresses, and counters. One work area exists for each CPU that is ina 
multiprocessing configuration and that is running CCW trace. 

Class Directory (MCCD) 
Created by: AHLSETEV. 
Referenced by: AHLMCER. 


Use: Contains the addresses of MC class elements (MCCLEs); used as an index 
to route control of trace events by class. 
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Class Element (MCCLE) 


Control Element (MCCE) 


Queue Element (MCQE) 


Created by: AHLSETEV. 
Referenced by: AHLMCER, AHLSETD. 


Use: Specifies a class of events to be traced and the event-handler routine to 
receive control for that class. 


Created by: AHLSETEV. 

Updated by: AHLMCER, AHLSETD. 

Referenced by: AHLREADR, AHLSET, IGCOFOSA. 

Use: Contains the addresses of the routine directories, the MC class directory 
(MCCD), and the MC event directory (MCED). Also contains the address of the 


first application control table (MCQE) and the SRB used to free the tables 
associated with this MCCE. 


Created by: AHLSETEV. 
Updated by: AHLGTFI (only the MCQE for the GTF application). 


Referenced by: AHLxWRIT, AHLMCER, AHLREADR, AHLSETD, 
AHLSTACK, AHLTMON. 


Use: Contains control information to define an MC application, for example, 
GTF. It contains the application’s name, the address of the next MCQE, an ECB 
used to terminate the application, and the addresses of the chains of MC class 
elements (MCCLEs) and of MC event elements (MCEEs). 


Event Handler Work/Save Area (MCRWSA) 


Created by: IPL/NIP, VARY CPU ONLINE. 


Updated by) AHLMCER, AHLMCIH, AHLSETD, AHLSETEV, AHLVCOFF, 
AHLVCON, IEAVNP17. 


Referenced by: AHLTEXT, AHLTFOR, AHLTPID, AHLTFCG, AHLTSVC, 
AHLTSYFL, AHLTUSR, AHLWTO, AHLTSLIP. 


Use: Contains register save area for the MC interrupt and the address of the 
MCAWSA. It is located in SQA and is pointed to by the LCCA work/save area 
vector table. 
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GTF Control Records 


Lost Block Record 


GTF places a lost block control record in the trace buffers whenever data 
contained in a GIFBLOK has been lost. 


Offset Size Description 
0 (0) 2 Record length in bytes. 
2 (2) 2 X‘0000’. 
4 (4) l Record identifier: X‘00Q’ indicates contro! record. 
5 (5) | Format identifier: ‘03’. 
X‘05’ for buffer full condition; 
6 (6) 4 Time zone value. 
10 (A) 8 TOD clock value. 
18 (12) 4 Lost event count. 


Lost Event Record 


GTF places a lost data control record in the trace buffers whenever data about an 
interruption is missed because buffers were full. 


Offset Size Description 

0 (0) 2 Record length in bytes. 

2 (2) 2 X‘0000’. 

4 (4) | Record identifier: X‘00O° indicates control record. 
5 (5) | Format identifier: X‘02’. 


X‘05’ for buffer full condition; 





6 (6) 4 Time zone value. 
10 (A) 8 TOD clock value. 
18 (12) 4 Lost event count. 


Save Hook Control Record 


GTF places a save hook control record in the trace buffers whenever a request 
from ABEND/SVC Dump is received for trace data. 


Offset Size Description 
0 (0) 2 Record length in bytes. 
2 (2) 2 X‘0000’. 
4 (4) l Record identifier: X‘00O’ indicates control record. 
5 (5) ] Format identifier: X‘00’. 
X‘05’ for buffer full condition; 
6 (6) 4 Time zone value. 
10 (A) 8 TOD clock value. 
18 (12) 2 EID, F200, F100 
20 (14) 2 ASID 
22 (16) 4 TCB 
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The first record in every vanable block. 


Offset 


iA eNO 


18 
18 


20 


21 


22 


23 


Size 
(0) 2 
(2) 2 
(4) 
(5) J 
(6) 4 
(A) 8 
(12) 8 
(12) 
le... 
wl]. 
i 
l... 
wd. 
wX. 
wl 
(13) J 
]... 
wL.. 
al. 
I... 
wl. 
wl. 
al 
(14) 
l... 
de. 
al. 
I... 
de. 
AL, 
wal 
(15) l 
l... 
A. 
al, 
l... 
XX. 
oe | 
(16) ] 
l... 
to. 
wl. 
l... 
XX. 
wl 
(17) 3 
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Description 


Record length in bytes. 

X‘0000’. 

Record identifier: X‘00’ means this is a control record. 
Format identifier: X‘O1’. 

Time zone value. 

TOD clock value. 

GTF option bytes. 


Option byte |: 
SYSM in effect. 
SYSP in effect. 
SYS in effect. 
USR in effect. 
TRC in effect. 
DSP in effect. 
Reserved 
PCI in effect. 


Option byte 2: 
SVC in effect. 
SVCP in effect. 
SIO specified; SSCH in effect. 
SIOP specified; SSCHP in effect. 
P] in effect. 
PIP in effect. 
IO in effect. 
IOP in effect. 


Option byte 3: 
EXT in effect. 
RNIO in effect. 
SRM in effect. 
RR in effect. 
SLIP in effect. 
CCW in effect. 
CCWP in effect. 
10 = SIO: the devices traced selectively for 
IO and SIO are identical. 


Option byte 4: 
CCW =1 in effect. 
CCW =S in effect. 
JOBNAMEP in effect. 
ASIDP in effect. 
USRP in effect. 
Reserved. 
User timestamp requested in each trace record. 


Option byte 5: 
SSCH in effect. 
SSCHP in effect. 
MSCH in effect. 
HSCH in effect. 
CSCH in effect. 
Reserved. 
IO = SSCH; the devices traced selectively for IO and 
SSCH are identical. 
Reserved. 
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GTF builds a record that has the following format when TRACE=CCW or 
TRACE=CCWP is in effect, and either a start subchannel (SSCH) occurs in the 
I/O supervisor SSCH subroutine, or an I/O interruption occurs. To trace channel 
programs, TRACE=SSCH or TRACE=I/O must also be in effect. 


Offset Size 
(0) 2 
2 (2) 2 
4 (4) l 
5 (5) l 
6 (6) 8 
14 (E) 2 
16 (10) 4 
20 ~»=(14) 2 
22 (16) 8 
30s (1E) 2 
32. (20) 2 
34 (22) | 
35 (23) 2 
37 (25) I 
38 (26) 2 
40 (28) > 
42 (2A) l 
43. (2B) 4 
47 (2F) g 
$5 (37) 27 


CCW Trace Message Record 


Description 


Record length in bytes. 

X‘0000". 

Record identifier: X°FF’ indicates trace record. 
Format identifier: ‘07’. 

Optional timestamp: if TIME= YES is specified, this field 
contains the eight bytes of the TOD clock value. 
Event identifier. 

ASCB. 

CPUID. 

Jobname. 

Device address. 

Maximum amount of data for each CCW. 

Flags for CCW trace formatter. 

Sequential record count for print dump of this event. 
Translate table ID for formatter. 

Flags describing data. 

Length of data in this CCW. 

Length of data in this record. 

Virtual address of CCW. 

CCW being traced. 

Data area or repeat of offset 37-55 if space available. 


GTF builds a record that has the following format when CCW trace has to 
output messages AHLI40D, AHL141D. AHLI46I. AHL147I, AHL148I1, 
AHL149], AHLISOI, AHLISII, AHL1521, AHLIS3I, or AHLIS4I. 


Offset Size 
0 (0) ? 
2 (2) 2 
4 (4) H 
§ (5) 
6 (6) & 
14 (E) 2 
16 (10) 4 
20 = (14) 2 
22 (16) 8 
30 = (1E) 2 
32 (20) 2 
34. (22) 2 
3§ (23) 2 
37 (25) 4 
41 (29) 4 
45 (2D) 2 
47 (2F) 225 
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Description 


Record length in bytes. 

X‘0000". 

Record identifier: X‘FF’ indicates trace record. 
Format identifier; X‘07’. 

Optional timestamp: if TIME = YES is specified, this field 
contains the eight bytes of the TOD clock value. 
Event identifier. 

ASCB. 

CPUID. 

Jobname. 

Device address. 

Not used: contains value used in CCW trace record. 
Flags for CCW trace formatter. 

Sequential record count for print dump of this event. 
‘MSG’ ID. 

Not used; zeroes. 

Length of message. 

Message data. 
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CSCH/HSCH Trace Record 


GTF builds a record that has the following format when either a CSCH or an 
HSCH event occurs and TRACE=SYSM, TRACE=SYS, TRACE=SYSP, 
TRACE =CSCH, or TRACE = HSCH 15 in effect. This record is common to 
both the CSCH event and the HSCH event. They can be differentiated by the 
EID value (X‘510S’ for CSCH, X‘5103’ for HSCH) found in the prefix section of 
the record at offset X‘E’. 


Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘0000’. 

4 (4) ] Record identifier: X*FF’ indicates trace record. 

5 (S) l Format identifier: X‘00’. 

6 (6) 8 Optional timestamp; if TIME = YES is specified, this field 


contains the eight bytes of the TOD clock value. 
14 (E) 2 Event identifier. 
X*5102’ indicates a CSCH event. 
X*5103’ indicates a HSCH event. 


16 (10) 2 ASCB. 

20 (14) 2 CPUID. 

22 (16) 8 Jobname. 

30 (1E) 2 Device number. 

32 (20) 2 Startability flags. 

34 (22) 4 Subchannel] identifier. 
38 (26) l Condition code. 

39 (27) ] Driver identifier. 

40 (28) ] Associated request driver identifier. 
4] (29) l IOSLEVEL. 

42 (2A) l UCBLEVEL. 


DSP Comprehensive Trace Record 


GTF builds a record that has the following format when an entry is made to the 
dispatcher to dispatch a unit of work and TRACE=DSP 1s the GTF option in 


effect. 
Offset Size Description 
0 (0) 2 Length of record in bytes. 
2 (2) 2 X‘0000’. 
4 (4) ] Record idenufier: X‘FF’ indicates a trace record. 
5 (5) | Format identifier: X‘Q2’. 
6 (6) 8 Optional timestamp; if TIME = YES is specified, this field 
contains the eight bytes of the TOD clock value. 
14 (E) 2 Event identifier. 
X‘0001’ indicates SRB dispatching. 
X‘0002’ indicates LSR dispatching. 
X‘0003’ indicates TCB dispatching. 
X‘0004’ indicates exit prolog dispatching. 
16 (10) 4 ASCB. 
20 (14) 2 CPUID. 
22 (16) 8 Jobname. 
30 (1E) 8 Resume PSW for new task. 
38 (26) 4 New TCB (for LSR and TCB, SRB for SRB). 
For TCB only: 
42 (2A) 8 CDE name. 
For SRB only: 
42 (2A) 4 Parm address. 
46 (2E) l Global or local. 
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DSP Minimal Trace Record 





GTF builds a record with the following format when an entry is made to the 
dispatcher to dispatch a unit of work and both TRACE=SYSM,DSP are the 
GTF options in effect. 


Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘0000”. 

4 (4) ] Record identifier: X*FF’ indicates trace record. 

5 (5) l Format identifier: X‘03’ indicates AMDSYS03. 

6 (6) 8 Optional timestamp; if TIME= YES is specified, this field 


contains the eight bytes of the TOD clock. 
14 (E) 2 Event identifier. 
X*0001’ indicates SRB dispatching. 
X ‘0002’ indicates LSR dispatching. 
X*0003° indicates TCB dispatching. 
X‘0004’ indicates exit prolog dispatching. 


16 (10) 4 ASCB. 

20 (14) 2 CPUID. 

22 (16) 8 Resume PSW for work unit being dispatched. 
30 (1E) 4 Current TCB or N/A (for TCB and LSR only). 
34 (22) 4 Register 15. 

38 (26) 4 Register 0 or SRB. 

42 (2A) 4 Register |. 

46 (2E) I For SRB only: global or local. 


EWA Trace Record 


GTF builds a record that has the following format if an EWA is present when 
CCW = IOSB 1s specified with TRACE =CCW or TRACE = CCWP. 





Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 ‘0000’. 

4 (4) ] Record identifier: X‘FF’ indicates trace record. 

5 (5) l Format identifier: X‘07’. 

6 (6) 8 Optional timestamp; if TIME= YES is specified, this field 
contains the eight bytes of the TOD clock value. 

14 (E) 2 Event identifier. 

16 (10) 4 ASCB. 

20 (14) 2 CPUID. 

22 (16) 8 Jobname. 

30 (LE) 2 Device address. 

32 (20) 2 Not used; contains value used in CCW trace record. 

34 (22) ] Flags for CCW trace formatter. 

35 (23) 2 Sequential record count for print dump of this event. 

37 (25) 4 ‘EWA’ ID. 

4] (29) 4 Address of EWA. 

45 (20) 2 Length of EWA in this record. 

47 (2F) 225 EWA data area. 
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( EXT Comprehensive Trace Record 


GTF builds a record that has the following format when an external interruption 
occurs and either TRACE=SYS or TRACE =EXT is in effect. 


Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X ‘0000’. 

4 (4) | Record identifier: X‘FF’ indicates a trace record. 

5 (5) | Format identifier: X‘02’. 

6 (6) 8 Optional timestamp; if TIME = YES is specified, this field 
contains the eight bytes of the TOD clock value. 

14 (E) 2 Event identifier: X‘6201° indicates an external 
interruption. 

16 (10) 4 ASCB. 

20 (14) 2 CPUID. 

22 (16) 8 Jobname. 

30 (LE) 8 External old PSW. 

38 (26) 4 Old TCB. 

For SIGP interrupt: 

42 (2A) 4 PARMFIELD. 

46 (2E) 2 CPUID. 

For clock comparator interrupt. 

42 (2A) 2 TQE flags. 

44 = (2C) 4 TOE exit. 

48 (30) 4 TQE ASCB. 

For CPU timer interrupt: 

42 (2A) 2 TQE flags. 

44 (2C) 4 TQE exit. 


—_ EXT Minimal Trace Record 


GTF builds a record with the following format when an external interruption 
occurs and TRACE=SYSM 1s the GTF option in effect. 


Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘0000’. 

4 (4) Record identifier: X‘FF’ indicates trace record. 

5 (5) j Format identifier: X‘Q3’. 

6 (6) 8 Optional timestamp; if TIME = YES is specified. this field 
contains the eight bytes of the TOD clock value. 

14 (E) 2 Event identifier: X*6201’ indicates an external 
interruption. 

16 (10) 4 ASCB. 

20 (14) 2 CPUID. 

22 (16) 8 External old PSW. 

30 (1E) 4 TCB of interrupted task or N/A. 

34 (22) 4 NTQE TCB or INT CPU or N/A. 
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IOSB Trace Record 





GTF builds a record that has the following format; GTF builds the record either 
when CCW =ISOB is specified with TRACE =CCW or TRACE =CCWP, or 
when an error message is outputted while tracing a channel program. 


Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘0000". 

4 (4) ] Record identifier: X‘FF’ indicates trace record. 

5 (5) ] Format identifier: X‘07’. 

6 (6) 8 Optional timestamp; if TIME= YES is specified, this field 
contains the eight bytes of the TOD clock value. 

14 (E) 2 Event identifier. 

16 (10) A ASCB. 

20 (14) 2 CPUID 

22 (16) 8 Jobname. 

30 (1E) 2 Device address. 

32 (20) 2 Not used; contains value used in CCW trace record. 

34 (22) ] Flags for CCW trace formatter. 

35 (23) 2 Sequential record count for print dump of this event. 

37 (25) “A ‘IOSB’ ID. 

4] (29) 4 Address of IOSB. 

45 (2D) 2 Length of IOSB. 

47 (2F) 225 IOSB data area. 


I/O Trace Record 


GTF builds record that has the following format when an I/O interruption occurs 
and TRACE =SYSM, TRACE=SYS, TRACE =I0, or TRACE =IOP is in ; 
effect. To trace PCI I/O interruptions, TRACE =PCI must also be in effect. 


Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘0000". 

4 (4) ] Record identifier: X‘FF’ indicates trace record. 

5 (5) ] Format identifier: X‘00’. 

6 (6) 8 Optional timestamp; if TIMESTAMP = YES is specified, this field 


contains the eight bytes of the TOD clock value. 
14 (B) 2 Event identifier: 
X‘2100’ indicates a PCI I/O interruption. 
X‘5101’ indicates an EOS I/O interruption. 
X‘5200° indicates an I/O interruption with a valid UCB. 


16 (10) 4 ASCB. 

20 (14) 2 CPUID. 

22 (16) 8 Jobname. 

30 (IE) 2 Device number. 
32 (20) 8 1/O old PSW. 
40 (28) 16 IRB. 

56 (38) 4 TCB. 

60 (3C) 2 Sense bytes. 

62 (3E) 2 Flags. 

64 (40) l Driver identifier. 
65 (41) ] IOSLEVEL. 

66 (42) ] UCBLEVEL. 
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MSCH Trace Record 


GTF builds a record that has the following format when an MSCH event occurs 
and TRACE =SYSM, TRACE=SYS, TRACE =SYSP, or TRACE = MSCH is in 
effect. 


Offset 


Ala BN © 


14 
16 
20 
22 
30 
34 
35 
36 
37 
38 
66 
67 
95 


PI Comprehensive Trace Record 


(0) 
(2) 
(4) 
(5) 
(6) 


(E) 

(10) 
(14) 
(16) 
(1E) 
(22) 
(23) 
(24) 
(25) 
(26) 
(42) 
(43) 
(SF) 


oo —_ — fF ho 


ober H He Ke RN ON aN 


to) 


Description 


Length of record in bytes. 

X‘0000’. 

Record identifier: X‘FF’ indicates trace record. 
Format identifier: X‘00’. 

Optional timestamp; if TIMESTAMP = YES is specified, this field 
contains the eight bytes of the TOD clock value. 
Event identifier: X‘5104’ indicates an MSCH event. 
ASCB. 

CPUID. 

Jobname. 

Device number. 

Subchannel identifier. 

Condition code. 

IOSOPT. 

IOSOPT2. 

IOSLEVEL. 

First SCHIB. 

UCBLEVEL. 

Second SCHIB. 


GTF builds a record that has the following format when a program interruption 
occurs and either TRACE=PI or TRACE= SYS in effect. 


Offset 


AA bWH © 


16 
20 


30 
38 
42 
46 
54 
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(0) 
(2) 
(4) 
(5) 
(6) 


(E) 


(10) 
(14) 
(16) 
(1E) 
(26) 
(2A) 
(2E) 
(36) 


Size 


oOo — — WO bo 


A ohh DO DOh fF 


Description 


Length of record in bytes. 
X‘0000’. 
Record identifier: X‘FF’ indicates trace record. 
Format identifier: X‘02’. 
Optional timestamp; if TIME= YES is specified, this field 
contains the eight bytes of the TOD clock value. 
Event identifier: 
X‘6101’ indicates a program interruption with codes 1-17, 19, 
128. 
X‘6200’ indicates a program interruption with code 18. 
ASCB. 
CPUID. 
Jobname. 
Program old PSW. 
INT TCB. 
Virtual page address. 
RB or CDE name. 
Registers 0-15. 
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GTF builds a record that has the following format when a program interruption 
occurs and TRACE=SYSM is the GTF option in effect. 


Offset Size Description 
0 (0) 2 Length of record in bytes. 
2 (2) 2 X*0000”. 
4 (4) l Record identifier: X‘FF’ indicates trace record. 
5 (5) l Format identifier: X‘03’. 
6 (6) 8 Optional timestamp; if TIME = YES is specified, this field 
contains the eight bytes of the TOD clock value. 
14 (E) 2 Event identifier: 
X‘°6101’ indicates a program interruption with codes 1-17, 19, 
128. 
X*6200’ indicates a program interruption with code 18. 
16 (10) 4 ASCB. 
20 (14) 2 CPUID. 
22 (16) 8 Jobname. 
30 (1E) 8 Program old PSW. 
30 (1A) 4 Old TCB. 
34 (1E) 4 Virtual page address. 
38 (26) 4 Register 15. 
42 (2A) 4 Register 1. 


RNIO Comprehensive Trace Record 


GTF builds a record that has the following format when ACF/VTAM requests an 
I/O path information unit (PIU) and the GTF options in effect are MODE= EXT 
and TRACE= RNIO. 


Note: ACF/VTAM Version 2 Diagnosis Guide describes the access method used 
to create the PIU data. 


Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘0000”. 

4 (4) ] Record identifier: X‘FF’ indicates trace record. 

5 (5) ] Format identifier: X‘04’. 

6 (6) 8 Optional timestamp; if TIME = YES is specified, this field 


contains 4 bytes of the CVTTZ field and the eight bytes 
of the TOD clock value. 
14 (E) 2 Event identifier: 
X‘8200’ indicates PIU output. 
X‘8100’ indicates PIU input. 


16 (10) 4 ASCB. 

20 (14) 2 CPUID. 

22 (16) 8 Jobname. 

30 (1E) 20 RNIO PIU data. Minimum of 10 bytes. Maximum of 20 bytes. 


The fifth halfword contains the number of remaining bytes. When 
PIU data is less than 20 bytes, the field is padded on the right 
with blanks. 
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RNIO Comprehensive Trace Record with ACF/VTAM 


GTF builds a record that has the following format when ACF/VTAM requests an 
I/O path information unit (PIU) and the GTF options in effect are MODE =EXT 
and TRACE=RNIO. 


Note: ACF/VTAM Version 2 Diagnosis Guide describes the access method used 
to create the PIU data. 


Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘0000’. 

4 (4) | Record identifier: X‘FF" indicates trace record. 

5 (5) | Format identifier: ‘04’. 

6 (6) 8 Optional timestamp; if TIME= YES is specified, this field 


contains the eight bytes of the TOD clock value. 
14 (E) 2 Event identifier: 
X‘8200’ indicates PIU output. 
X‘8100’ indicates PIU input. 


16 (10) 4 ASCB. 

20 (14) 2 CPUID. 

22 (16) 8 Jobname. 

30 (IE) 20 RNIO PIU data. Valid range is 1-20 bytes. RO contains the 
number of bytes to collect. If RO is greater than 20, 20 byles 
are collected. If RO 1s less than 20, the field is padded on the 
nght with blanks. 

50 (32) 4 Contents of Register 0. 


RNIO Minimal Trace Record 


GTF builds a record that has the following format when ACF/VTAM requests an 
I/O path information unit (PIU) and the GTF option in effect is either 
MODE=INT or the combination of TRACE=SYSM and TRACE=RNIO. 


Note: ACF/VTAM Version 2 Diagnosis Guide describes the access method used 
to create the PIU data. 


Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X*0000’. 

4 (4) ] Record identifier: X‘FF’ indicates trace record. 

5 (5) J Format identifier: ‘03’. 

6 (6) 8 Optional timestamp; if TIME= YES is specified, this field 


contains 4 byles of the CVT TZ field and the eight bytes 
of the TOD clock value. 

X‘°8200’ indicates PIU output. 

X°8100" indicates PIU input. 


16 (10) 4 ASCB. 
20 (14) 2 CPUID. 
22 (16) 20 RNIO PIU data. Minimum of 10 byles. Maximum of 20 


byles. The fifth halfword contains number of remaining bytes. 
When PIU data is less than 20 bytes, the field is padded on the 
right with blanks. 
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RNIO Minimal Trace Record with ACF/VTAM 





GTF builds a record that has the following format when ACF/VTAM requests an 
I/O path information unit (PIU) and the GTF option in effect is either 
MODE=INT or the combination of TRACE=SYSM and TRACE=RNIO. 


Note: ACF/VTAM Version 2 Diagnosis Guide describes the access method used 
to create the PIU data. 


Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘0000’. 

4 (4) | Record identifier: X‘FF’ indicates trace record. 

5 (5) | Format identifier: X‘03’. 

6 (6) 8 Optional timestamp; if TIME= YES 1s specified, this field 


contains the eight bytes of the TOD clock value. 
14 (E) 2 Event identifier: 
X*8200’ indicates PIU output. 
X‘8100’ indicates PIU input. 


16 (10) 4 ASCB. 
20 (14) 2 CPUID. 
22 (16) 20 RNIO PIU data. Valid range is 1-20 bytes. RO contains the 


number of bytes to collect. If RO is greater than 20, 20 bytes 
are collected. If RO is less than 20, the field is padded on the 
right with blanks. 

42 (2A) 4 Contents of RO. 


RR Comprehensive Trace Record 


GTF builds a record that has the following format when an invocation of a 
recovery routine occurs and TRACE=SYS or TRACE=RR is in effect. 





Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘*0000’. 

4 (4) ] Record identifier: X‘FF’ indicates trace record. 

5 (5) ] Format identifier: X‘04’ indicates AMDSYS04. 

6 (6) 8 Optional timestamp; if TIME=YES is specified, this field 


contains the eight bytes of the TOD clock. 
14 (E) 2 Event identifier. 
X‘4002’ indicates STAE/ESTAE invocation. 
X‘4003’ indicates FRR invocation. 


16 (10) 4 ASCB. 

20 (14) 2 CPUID. 

22 (16) 8 Jobname. 

30 (IE) 8 Name of recovery routine or U/A. 

38 (26) 8 PSW current when error occurred. 

46 (2E) 4 Completion code. 

50 (32) 8 Error flags from system diagnostic work area (SDWA). 
58 (3A) 4 Retry address or N/A. 

62 (3E) 4 Address of SDWA (STAE/ESTAE only). 
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RR Minimal Trace Record 


GTF builds a record that has the following format when an invocation of a 
recovery routine occurs and TRACE =SYS is 1n effect. 


Offset 


Nirah N © 


16 
20 


30 
34 
38 
4] 
42 


46 


RSCH Trace Record 


(0) 
(2) 
(4) 
(5) 
(6) 


(E) 


(10) 
(14) 
(16) 
(IE) 
(22) 
(26) 
(29) 
(2A) 


(2E) 


Size 


ome NN 


he WER ON FE 


aN 


Description 


Length of record in bytes. 
X‘0000’. 
Record identifier: X‘FF’ indicates trace record. 
Format identifier: X‘03’ indicates AMDSYS0O3. 
Optional timestamp; if TIME= YES is specified, this field 
contains the eight bytes of the TOD clock. 
Event identifier: 

X‘4002’ indicates STAE/ESTAE invocation. 

X‘4003’ indicates FRR invocation. 
ASCB. 
CPUID. 
Error PSW. 
Completion code. 
Error flags from system diagnostic work area (SDWA). 
Additional error flags from SDWA. 
Return code from recovery routine (STAE/ESTAE only). 
Retry address or N/A. Note: If no return code at offset 
41, begin retry address at offset 41. 
Address of SDWA (STAE/ESTAE only). Note: If retry 
address begins at offset 41, SDWA address begins at offset 45. 


GTF builds a record that has the following format when an RSCH event occurs 
and TRACE=SYSM, TRACE=SYS, TRACE =SYSP, or TRACE = RSCH 1s in 
effect. 


Offset 
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(0) 
(2) 
(4) 
(5) 
(6) 


(E) 
(10) 
(14) 
(16) 
(1E) 
(20) 
(24) 
(28) 
(2C) 
(2D) 
(35) 
(36) 
(37) 
(38) 
(39) 
(3A) 


Size 


Coo me KS KN LO 


oe ee ee ee COm LP HR BRN CON B LO 


Description 


Length of record in bytes. 

X‘0000’. 

Record identifier: X‘FF’ indicates trace record. 
Format identifier: X‘Q0’. 

Optional timestamp; if TIMESTAMP = YES is specified, this field 
contains eight bytes of the TOD clock value. 
Event identifier: X‘5106’ indicates an RSCH event. 
ASCB. 

CPUID. 

Jobname. 

Device number. 

Real address of channel program. 

Virtual address of channel program. 

IOSDSID. 

Condition code. 

Dynamic seek address. 

IOSGPMSK. 

IOSOPT. 

IOSFMSK. 

Driver identifier. 

IOSLEVEL. 

UCBLEVEL. 
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SLIP Trace Records 





GTF builds a SLIP trace record when TRACE =SLIP is the GTF option in effect 
and: 


@ A SLIP trap has matched and either TRACE or TRDUMP has been specified 
on the SLIP command. 


@ A SLIP trap isin DEBUG mode (specified on the SLIP command) and is 
inspected by the SLIP processor as a result of any SLIP event. 


The SLIP trace records are: 

@ SLIP Standard Trace Record 

@ SLIP Standard/User Trace Record 
@ SLIP User Trace Record 

@ SLIP DEBUG Trace Record 


SLIP Standard Trace Record: GT¥ builds a record that has the following format 
when the HOOK macro instruction is issued with an EID of IEAVSLSD. 


Notes: 
1. UA indicates the data is unavailable. 


2. N/A indicates the data is not applicable. 





3. Asterisks (** ... **) are used if an error occurred when attempting to obtain 
data or the data is unavailable because it is paged out. 


Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘0000’. 

4 (4) 1 Record identifier: X‘FF’ indicates trace record. 

5 (5) ] Format identifier: X‘04’ indicates AMDSYS04. 

6 (6) 8 Optional timestamp; if GTF option TIME= YES is 


specified, this field contains the eight bytes of the 
TOD clock value. 


14 (E) 2 Event identifier: X‘4004’ indicates a SLIP standard 
trace record. 

16 (10) 4 ASCB address. 

20 (14) 2 CPUID. (Note: When SLIP is entered from RTM2, 


the CPUID recorded may be different from the 
CPUID when RTM2 was minning. 


22 (16) 8 Jobname from current address space (or N/A). 
30 (1E) 4 SLIP trap ID. 

34 (22) 2 ASID of current address space. 

36 (24) 8 Job step program name (or U/A or N/A). 

44 (2C) 4 TCB address (or N/A). 
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Offset 

48 (30) 
49 (31) 
50 (32) 
51 (33) 
52 (34) 
53. (35) 


Description 

System mode indicators, byte 1: 
Supervisor control mode. 

Disabled for I/O and external interrupts. 
Global spin lock held. 

Global suspend lock held. 

Local lock held. 

Type 1 SVC in control. 

SRB mode. 

TCB mode. 


System mode indicators, byte 2: 

Recovery routine in control (always zero if a PER 
interrupt). 

Problem program state. 

Supervisor state. 

System key. 

Problem program key. 

Any global lock held. 

Any lock held. 


Error byte | (or zeros if a PER interrupt): 
Program check interrupt. 

Restart interrupt. 

SVC error. 

Abend; task issued SVC 13. 

Paging I/O error. 

Dynamic address translation error. 
Software error caused by machine check. 
Abnormal address space termination. 


Error byte 2 (or zeros if a PER interrupt): 
Memterm. 

SLIP flags: 

DEBUG record. 

Registers collected. 

Data unavailable counter (or zeros if DATA was not 
specified for the trap). 


The following fields apply to PER interrupts only (otherwise set to N/A (or N or 


one-byte fields)). 


Offset 

55 (37) 
63 (GF) 
71. (47) 
77 +‘ (4D) 
81 (51) 
87 (57) 
91 (5B) 
95 (SF) 
103. (67) 
107 (68) 
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Description 

Load module name in which the interrupt occurred (or U/A 
or N/A). 

Offset in load module (or U/A or N/A). 

Instruction content (six bytes of data beginning at the address 
of the instruction that caused the PER interrupt). 

Target instruction address if EXECUTE instruction (or N/A 
or U/A). 

Target instruction content if EXECUTE instruction (six bytes 
of data beginning at the target instruction address), or (N/A 
or U/A). 

Beginning range virtual address if SA (storage-alteration) 
specified on SLIP command (or N/A). 

Four bytes of storage starting at beginning range virtual 
address if SA specified (or N/A or U/A). 

Program old PSW. 

Program interrupt code (PIC) and instruction length code. 


PER interrupt code: 
Successful-branch event (SB). 
Instruction-fetch event (IF). 
Storage-alteration event (SA). 
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Offset Size Description 
108 (6C) l PER trap mode: 
| ee Successful-branch monitoring (SB). 
> re Instruction-fetch monitoring (IF). 
i Storage-alteration monitoring (SA). 
> ee Reserved. 
1... PER trap. 
A. Recovery specified. 
wl. Message flag. 
_ wal Message flag. 
109 (6D) 2 Keymask. 
111 = (6F) 2 SASID. 
113.0 (7D 2 Authorization index. 
11S = (73) 2 PASID. 
117 = (75) l PSW S bit indicator (Fl indicates secondary addressing 
mode, FO indicates primary addressing mode). 
118 (76) 8 Reserved. 


SLIP Standard + User Trace Record: GTF builds a record that has the 
following format when the HOOK macro instruction is issued with an EID of 


IEAVSLSU. 

Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘0000’. 

4 (4) ] Record identifier: X‘FF’ indicates trace record. 

5 (5) J Format identifier: X‘04 indicates AMDSYS04. 

6 (6) 8 Optional timestamp; if GTF option TIME= YES is 
specified, this field contains the eight bytes of the 
TOD clock value. 

14 (E) 2 Event identifier: X‘400S’ indicates a SLIP standard/ 
user record. 

16 (10) 4 

through Fields are identical to the SLIP standard record. 

118 (76) 18 

136 =(88) 2 Length of user-defined data. 

138 (8A) variable User-defined data (specified via the TRDATA parameter 


on the SLIP command). 


SLIP User Trace Record: GTF builds a record that has the following format 
when the HOOK macro instruction is issued with an EJD of JEAVSLUR. 


Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘0000’. 

A (4) l Record identifier: X‘FF’ indicates trace record. 

5 (5) l Format identifier: X‘04’ indicates AMDSYS04. 

6 (6) 8 Optional timestamp; if GTF option TIME = YES is 
specified, this field contains the eight bytes of the 
TOD clock value. 

14 (E) 2 Event identifier: X‘4006’ indicates a SLIP user record. 

16 (10) 2 CUPUID (See Note 3). 

18 (12) 2 Extension number (See Note 3). 

20 (14) l Continuation length (See Note 3). 

21 (15) 2 Length of the user defined data (See Notes 1, 2, and 3). 


23 (17) variable User-defined data (specified via the TRDATA parameter 
on the SLIP command). (See Note 3). 
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Notes: 


I. 


If the SLIP user requests registers to be placed in the SLIP user record, they 
will be the first field in the record. 


A length field of zero indicates that the user-defined data was not available (for 
example, the data is paged out). 


The TRDATA parameter on the SLIP command specifies one or more data 
ranges. The number of records needed to trace these ranges depends on the size 
of the ranges specified. The trace contains a standard plus (+ ) user record 
from the next range or a user record followed by as many user records and user 
continuation records as needed to trace the ranges specified. The header for 
each record contains the CPUID and extension number to help correlate the 
output (extension numbers apply only to user and user continuation records). 
When a record is partially filled and the data from the next range will not fit in 
the remaining space; the AHLSTACK macro instruction writes the partially 
filled record to the trace data set. Another user record is built, the extension 
number is increased by one, and the continuation length is set to zero. The data 
length and data is then copied into this record. 


When the length of the data from a range is greater than 249 bytes, the excess 
data is put in user continuation records in the following manner. The data 
length and first 248 bytes are put ina user record. After writing that record a 
user continuation record is built. The extension number is increased by one and 
the continuation length is set to the number of bytes of data to be put in this 
record. If more than 251 bytes of data are left, 248 bytes are copied into 
record, and it is written. User continuation records are built until all the data in 
from that range is traced. 


SLIP DEBUG Trace Record: GTF builds a record that has the following format 
when the HOOK macro instruction 1s issued with an EID of IEAVSLSU and the 
SLIP trap is in DEBUG mode. 


Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘0000’. 

4 (4) ] Record identifier: X‘FF’ indicates trace record. 

5 (5) ] Format identifier: X‘04’ indicates AMDSYS04. 

6 (6) 8 Optional timestamp; if GTF option TIME= YES is 


specified, this field contains the eight bytes of the 
TOD clock value. 


14 (E) 2 Event identifier: X‘4005’ indicates SLIP standard/ 
user trace record. 

16 (10) 4 

through Fields are identical to the SLIP standard record. 

109. (6D) 27 (See Note 1.) 
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Offset Size Description 


136 = (78) ] DEBUG byte 1: 

| ADDRESS test. 

5 ASID test. 

1. wees COMP test. 

.l _ DATA test. 
lL... ERRTYP test. 
wL.. JOBNAME test. See Note 2. 
i. JSPGM test. 
wel LPAMOD test. 


137 = (79) l DEBUG byte 2: 
1... —_ MODE test. 
; PVTMOD test. 
ee RANGE test. 
| _ ASIDSA test. 


Notes: 


1. The high-order bit in the SLIP flags (SFLG) field (at offset X‘34’) is set on to 
indicate a DEBUG record. 


2. For each SLIP event, these bytes (at offsets (X‘78’ and X‘79’) represent: 


@ A bit set to one indicates that the corresponding keyword test did not 
match. 


@ Bits set to zero indicate that the corresponding keyword test (1) matched, 
or (2) was not performed. 


SRM Comprehensive Trace Record 


GTF builds a record that has the following format when an invocation of the 
system resource manager occurs and TRACE=SYS or TRACE=SRM is in 


effect. 

Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘0000”. 

4 (4) l Record identifier: X‘FF’ indicates trace record. 

5 (5) l Format identifier: X‘04’ indicates AMDSYS04. 

6 (6) 8 Optional timestamp; if TIME= YES is specified, this 
field contains the eight bytes of the TOD clock. 

14 (E) 2 Event identifier: X‘4001’. 

16 (10) 4 ASCB. 

20 (14) 2 CPUID. 

22 (16) 8 Jobname. 

30 (1E) 4 Register 15. 

34 (22) 4 Register 0. 

38 (26) 4 Register 1. 
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( SRM Minimal Trace Record 


GTF builds a record that has t he following format when an invocation of the 
system resource manager occurs and TRACE=SYSM is the GTF option in 


effect. 

Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘0000’. 

4 (4) I Record identifier: X‘FF’ indicates trace record. 

5 (5) l Format identifier: X‘03’ indicates AMDSYS03. 

6 (6) 8 Optional timestamp; if TIME= YES is specified, this 
field contains the eight bytes of the TOD clock value. 

14 (E) 2 Event identifier: X‘4001’. 

16 (10) 4 ASCB. 

20 (14) 2 CPUID. 

22 (16) 4 Register 15. 

26 (1A) 4 Register 0. 

30 (JE) A Register }. 


SSCH Trace Record 


GTF builds a record that has the following format when an SSCH event occurs 
and TRACE=SYSM, TRACE=SYS, TRACE=SYSP, TRACE=SSCH or 
TRACE=SSCHP is in effect. 


Offset Size Description 
0 (0) 2 Length of record in bytes. 
2 (2) 2 X‘0000’. 
‘ 4 (4) | Record identifier: X‘FF’ indicates trace record. 
5 (S) l Format identifier: X‘00’. 
6 (6) 8 Optional timestamp; if TIMESTAMP= YES its specified, this 
field contains eight bytes of the TOD clock value. 
14 (E) 2 Event identifier: X‘5105’ indicates an SSCH event. 
16 (10) 4 ASCB. 
20 (14) 2 CPUID. 
22 (16) 8 Jobname. 
30 (JE) 2 Device number. 
32 (20) 4 Real address of channel program. 
36 (24) 4 Virtual address of channel program. 
40 (28) 4 IOSDSID. 
44 (2C) ] Condition code. 
45 (2D) 12 ORB. 
57 (39) 8 Dynamic seek address. 
65 (31) ! IOSGPMSK. 
66 (42) ! IOSOPT. 
67 (43) | IOSFMSK. 
68 (44) 1 Driver identifier. 
69 (45) | IOSLEVEL. 
70 (46) ! UCBLEVEL. 
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SVC Comprehensive Trace Records 


GTF builds SVC comprehensive trace records when an SVC interruption occurs 
and either TRACE=SYS or TRACe =SVC is in effect. All SVC records contain 
the basic data described below; however, many SVC numbers invoke additional 
data recording, described following the basic data. 


Basic SVC Comprehensive Trace Record 


Offset Size Description 

0 (0) 2 Length of record in bytes. 

2 (2) 2 X‘0000’. 

4 (4) ] Record identifier: X‘FF’ indicates trace record. 

5 (S) ] Format identifier: X‘OL’. 

6 (6) 8 Optional] timestamp; if TIME=YES is specified, this fteld 
contains the eight bytes of the TOD clock value. 

14 (E) 2 Event identifier: X*1000’ indicates an SVC 
interruption. 

L6 (10) 4 ASCB. 

20 (14) 2 CPUID. 

22 (16) 8 Jobname. 

30 (IE) 8 SVC old PSW. The third and fourth bytes contain the 
SVC number. 

38 (26) 4 Old TCB. 

42 (2A) 8 CDE name. 

50 (32) 4 Register 15. 

54 (36) 4 Register 0. 

$8 (38) 4 Register lt. 

GTF builds only a basic comprehensive trace record for the following SVCs: 

Name Number Name Number 

EXIT 3 TEST 97 

GETMAIN/FREEMAIN 10 SUBMIT 100 

TIME 1] QTIP 101 

SYNCH 12 XLATE 103 

MGCR 34 TOPCTL 104 

WTL 36 IMBLIB 105 

TTROUTER 38 REQUEST 106 

CIRB 43 MODESET 107 

TTIMER 46 None 109 

TTOPEN 49 DSTATUS 110 

NOP 50 JECS 111 

OLTEP 59 RELEASE 112 

TSAV 61 SIR 113 

CHATR 72 BLKPAGE 115 

(IFBSTAT) 76 None 116 

STATUS 79 None 117 

SMFWT™M 83 DSSPATCH 118 

(IGC084) 84 TESTAUTH 119 

SWAP 85 GETMAIN/FREEMAIN 120 

EMSERV 89 None 121 

VOLSTAT 91 None 122 

TPUT/TGET 93 PURGEDQ 123 

TSO terminal control 94 TPIO 124 

SYSEVENT 95 
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Minimal Trace Record 
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Basic SVC Comprehensive Trace Record with Parameter List Information: Refer 
to Debugging Handbook for details of the additional information gathered for the 


following SVCs: 


Name 


EXCP 
WAIT/WAITR 
POST 
GETMAIN 
FREEMAIN 
LINK 

XCTL 

LOAD 
DELETE 
ABEND 

SPIE 
ERREXCP 
PURGE 
RESTORE 
BLDL/FIND 
OPEN 
CLOSE 
STOW 

OPEN TYPE = J 
CLOSE TYPE = T 
DEVTYPE 
TRKBAL 
CATLG 
OBTAIN 
CVOL 
SCRATCH 
RENAME 
FEOV 
ALLOC 
IOHALT 
WTO/WROR 
SEGLD/SEGWT 
LABEL 
EXTRACT 
IDENTIFY 
ATTACH 
CHAP 
OVLYBRCH 


Number 


onNNn BN © 


S&B HPP Ph BWWWWWWWNONNNNNNNNN PR err 
MPN — ODOT MWNK CO WAIN N PWN KK OW WAIN Nn LW 


Name 


STIMER 

DEQ 

SNAP 
RESTART 
RELEX 
DISABLE 

EOV 
ENQ/RESERVE 
FREEDBUF 
RELBUF/REQBUF 
STAE 

DETACH 
CHKPT 
RDJFCB 
BTAMTEST 
BSP 

GSERV 
ASGNBFR/BUFINQ/RLSEBFR 
SPAR 

DAR 

DQUEUE 
LSPACE 

GJP 

SETPRT 
DISKANAL 
ATLAS 

DOM 

MOD88 
TCBEXCP 
STAX 
PROTECT 
Dynamic allocation 
TCAM 
EXCPVR 


Number 


47 
48 
51 
52 
53 
54 
55 
56 


58 
60 
62 
63 
64 
66 
69 


71 
73 
74 
75 
78 
80 
81 
82 
86 
87 
88 
92 
96 


99 
102 
114 


GTF builds a record that has the following format when an SVC interruption 
occurs and TRACE=SYSM is the GTF option in effect. 


Offset 

0 (0) 
2 (2) 
4 (4) 
5 (5) 
14 (E) 
16 (10) 
20 (14) 
22 (16) 
30 (IE) 
34 (22) 
38 (26) 
42 (2A) 


Size 


COON #& N om NN 


a 


Description 


Length of 
X‘0000’. 


Record identifier: X‘FF’ indicates trace record. 


record in bytes. 


Optional timestamp; if TIME= YES is specified, this field 


contains the eight bytes of the TOD clock value. 
Event identifier: X‘1000’ indicates an SVC interruption. 


ASCB. 
CPUID. 


SVC old PSW. The third and fourth bytes contain the 
SVC number. 


Old TCB. 


Register 15. 


Register 0. 
Register 1. 
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Section 5: Diagnostic Aids 


Event Identifier (EID) 
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This section contains the following information to aid the reader in diagnosing 
GTF errors: 


@ A list of event identifiers (EIDs) with their symbolic names and associated 
events. 


® A list of format identifiers (FIDs) with their associated AMDPRDMP format 
modules. 


@ A list of record identifiers (AIDs) with their associated record types. 
@ A description of the return codes issued by GIF modules. 
Note: 


Refer to System Messages for message number, message text, and detecting, 
issuing and containing modules. 


The event identifier (EID) in GTF trace records 1s a two-byte hexadecimal 
number that defines the event that caused the record to be built. The EID is in 
the form cddd where c is the event class (0-F) and ddd is the ID of the event 
within the class. 


EID EID 

(hex) (symbolic name) Issued by Event 

0001 IEADISP1 Dispatcher SRB dispatch. 

000 IEADISP2 Dispatcher LSR dispatch. 

0003 IEADISP3 Dispatcher TCB dispatch. 

0004 JEADISP4 SVC exit prologue SVC dispatch. 

1000 IEASVCH SVC FLIH SVC interrupt. 

2100 [ECPCI IOS PCI interrupt. 

4001 IRASRM System Resource SYSEVENT event. 

Manager 

4002 IEASTAE RTM STAE/ESTAE event. 

4003 IEAFRR RTM FRR event. 

4004 IEAVSLSD RTM SLIP event. 

4005 IEAVSLSU RTM SLIP event. 

4006 IEAVSLUR RTM SLIP event. 

510) IECEOS IOS End-of-sense interrupt. 

5102 IECCSCH IOS Clear subchannel event. 

5103 IECHSCH IOS Halt subchannel event. 

5104 IECMSCH IOS Modify subchannel event. 

5105 IECSSCH IOS Start subchannel event. 

5106 IECRSCH IOS Resume subchannel event. 

5200 IECIO2 IOS Normal] I/O interrupt. 

6101 [EAPINT PFLIH Program interrupt (codes 1-17, 
19). 

6200 IEATINT PFLIH Program interrupt (code 18). 

6201 IEAEINT EFLIH External interrupt. 

8100 ISPTPIO1 VTAM Remote network input received 
as a PIU. 

8200 ISPTPIO2 VTAM Remote network output PIU. 
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EID EID 

(hex) (symbolic name) Issued by Event 

F100 IEASVCD SVC Dump SVC Dump requesting trace 
data. 

F200 IEAAABOF ABDUMP/SNAP ABDUMP requesting trace data. 

E000-E3FF GTF user User data passed by E3FF 
GTRACE macro. 

E400-EBFF Not Issued Reserved. 

EC00-EF9F Reserved. 

EFA0-EFA9 TCAM 

EFAA-EFAE Reserved. 

EFAF-EFEO IMDGPD0!1- IBM components 

IMDGPD50 

EFEI1 ISTVIEID VTAM VTAM interval trace. 

EFE2 ISTTHEID VTAM Reserved. 

EFE3 ISTTREID VTAM Reserved. 

EFE4 ISTTDEID VTAM Reserved. 

EFE5S-EFEE JES2 

EFEF ISTTPEID VTAM TPIOS buffer. 

EFEF ISTTPEID VTAM TPIOS buffer. 

EFFO ISTRPEID VTAM Buffer pool allocation. 

EFF 1 ISTCLEID VTAM Control layer. 

EFF2 ISTLNEID VTAM Line trace. 

EFF3 IGGSP002 SAM/PAM/DAM 

EFF4 IGGSP008 SAM/PAM/DAM 

EFF5 IDAAMOl1 VSAM 

EFF6 IGGSP112 SAM/PAM/DAM 

EFF7 IGGSP215 SAM/PAM/DAM 

EFF8 IGGSP119 SAM/PAM/DAM 

EFF9 IGGSP235 SAM/PAM/DAM 

EFFA IGGSP239 SAM/PAM/DAM 

EFFB IGGSP145 SAM/PAM/DAM 

EFFC IGGSP251 SAM/PAM/DAM 

EFFC IGGSP451 SAM/PAM/DAM 

EFFE IGGSP169 SAM/PAM/DAM 

EFFF IHLMDMAI OPEN/CLOSE/EOV 


Format Identifier (FID) 


The format identifier (FID) in GTF records is a one-byte hexadecimal number 
that is used to determine the name of the AMDPRDMP EDIT module that will 
format the record. 


EID 
(hex) 
00 
01-50 
F9 
FD 
FE 


FF 


EID 


(symbolic name) 


E000-EFE4 


E000-E3FF 
EFF5 

EFEF 
EFFO-EFF2 
EFF3-4 
EFF6-E 
EFFF 


LY28-1189-2 © Copyright IBM Corp. 1982 1985 


Issued by 
User/component 
User 

VSAM 

VTAM 
SAM/PAM/DAM 


OPEN/CLOSE/EOV 


Event 


CSECT AMDPRHEX 
in AMDPRREC 
IMDUSR (01-50) 
IMDUSRF9 
IMDUSRFD 


IMDUSRFE 


IMDUSRFF 
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SESSSSssss Fz 
ta 


01 
01 


02 


02 


02 


03 
03 
03 
03 
03 


03 
03 
03 
03 
03 


03 
03 


Record Identifier (AID) 


(hex) 
2100 
5101 
5102 
5103 
5104 
5105 
5106 
5200 
F100 
F200 


1000 
N/A 


6101 
6200 
0001 
0002 
0003 


N/A 


1000 
2100 
6101 
6200 
6201 
0001 
0002 
0003 


4001 
4002 
4003 
N/A 


8100 
8200 
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Record Type 


Comprehensive PCI 
Comprehensive EOS 
Comprehensive CSCH 
Comprehensive HSCH 
Comprehensive MSCH 
Comprehensive SSCH 
Comprehensive RSCH 
Comprehensive I/O 
Save hook control 

If buffer in full 
condition, FID = X‘0S’ 
Comprehensive SVC 
Timestamp 


Comprehensive PI 
Comprehensive PI 


Comprehensive DSP 


Lost data 


Minimal SVC 
Minimal PCI 
Minimal PI 
Minimal PI 
Minimal EXT 


Minimal DSP 


Minimal SRM 

Minimal STAE/ESTAE 
Minimal FRR 

Lost block 


Minimal RNIO input 
Minimal RNIO output 


AMDPRDMP 
Format Module 


AMDSYS00 
AMDSYS00 
AMDSYS00 
AMDSYS00 
AMDSYS00 
AMDSYS00 
AMDSYS00 
AMDSYS00 
AMDSYS00 
AMDSYS05 


AMDSYS01 

CSECT AMDPRCON 
in AMDPRREC 
AMDYSS02 
AMDSYS02 


AMDSYS02 


CSECT AMDPRCON 
in AMDPRREC 
AMDSYS03 
AMDSYS03 
AMDSYS03 
AMDSYS03 
AMDSYS03 


AMDSYS03 


AMDSYS03 
AMDSYS03 
AMDSYS03 

CSECT AMDPRCON 
in AMDPRREC 
AMDSYS03 
AMDSYS03 


The record identifier (AID) in GTF records 1s a one-byte hexadecimal number 





that identifies the record as a trace record or a control record. 


Aid 

(hex) Record Type 

00 Control record. 

FF Trace record created by a GTF record build module for an event. 
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GTF Return Codes 


Return codes are always passed in register 15. 


Module 
AHLCWRIT 
AHLGTFI 


AHLIWRIT 
AHLMCER 
AHLMCIH 


AHLREADR 


AHLSBLOK 
AHLSBUF 


AHLSCAN 


AHLSETD 


AHLSETEV 


AHLSETMG 
AHLTCCWG 
AHLTCTLI 


AHLTCTL2 
AHLTDIR 
AHLTEXT 


AHLTFCG 
AHLTFOR 


CSECT 
AHLCWRIT 
AHLGTFI 


AHLIWRIT 
AHLMCER 
AHLMCIH 


AHLREADR 


AHLSBLOK 
AHLSBUF 


AHLSFEOB 


AHLSCAN 


AHLSETD 


AHLSETEV 


AHLSETMG 
AHLTCCWG 
AHLTCTLI 


AHLTCTL2 
AHLTDIR 
AHLTEXT 


AHLTFCG 
AHLTFOR 
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Entry 


Point 
AHLCWRIT 


AHLGTFI 
AHLIESTA 


AHLIWRIT 
AHLMCER 


AHLMCIH 
AHLMCIHB 
AHLMCFRR 


AHLREADR 


AHLSBLOK 


AHLSBCU1 
AHLSBUF 
AHLSFEOB 


AHLSCAN 


AHLSETD 


AHLSETEV 


AHLTCCWG 
AHLTCTLI 


AHLTDIR 


AHLTEXT 
AHLTEXTE 


AHLTFCG 


AHLTFORE 
AHLTFRR 
AHLTRNIO 
AHLTSRM 
AHLTSTAE 


Return 

Code Meaning 

None 

None 

None 

None 

None 

None 

XX Retry condition 

0 Data transferred. 

4 No data transferred; GTF inactive. 

8 No data transferred; no matching 
SLE. 

XX ABEND conditon. 

XX 

XX ABEND condition. 

0 FEOB performed. 

4 Cannot perform FEOB; record 
will be lost. 

0 Processing completed normally. 

8 Error in AHLSCAN. 

12 STOP command issued. 

0 All requests have been satisfied. 

4 At least 1 request satisfied; at least 
1 request unsatisfied because of 
invalid EID or class. 

8 No requests satisfied; invalid func- 
tion name or parameter list. 

12 No requests satisfied; all invalid 
EIDs/classes. 

0 Processing completed normally. 

16 Request not satisfied due to 
insufficient storage. 

20 Control register 8 could not be set 
on one or more CPUs; MC routine 
can proceed. 

N/A 

None 

0 Processing completed normally. 

12 STOP command was issued. 

N/A 

None 

None 

None 

None 

None 

None 

None 

None 

None 
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Module 
AHLTMON 


AHLTPID 


AHLTPMT 


AHLTSCN 


AHLTSLIP 
AHLTSVC 
AHLTSYFL 


AHLTSYSM 


AHLTTAB 


AHLTUSR 


AHLTXSYS 


AHLT103 
AHLVCOFF 
AHLVCON 
AHLWTASK 
AHLWTMSG 
AHLWTO 


AHLWWRIT 


CSECT 
AHLTMON 


AHLTMMSG 
AHLTPID 


AHLTPMT 


AHLTSCN 


AHLTSLIP 
AHLTSVC 
AHLTSYFL 


AHLTSYSM 


AHLTTABSB 


AHLTUSR 


AHLTXSYS 


AHLT103 
AHLVCOFF 
AHLVCON 
AHLWTASK 
AHLWTMSG 
AHLWTO 


AHLWWRIT 
AHLWRMSG 
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Entry 
Point 


AHLTMON 
AHLTESTA 


AHLTDSP 
AHLTLSR 
AHLTPI 

AHLTSRB 


AHLTPMT 


AHLTSCN 


AHLTSLIP 
AHLTSVC 


AHLFIO 
AHLFPI 
AHLFSIO 
AHLFSVC 


AHLDSP 
AHLEXT 
AHLPI 
AHLSTAE 
AHLSVC 


AHLTTAB 


AHLTUSR 


AHLSRB 
AHLSRM 


AHLT103 
AHLVCOFF 
AHLVCON 
AHLWPOST 


AHLWTOMD 
AHLDMPMD 


AHLWWRIT 
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Return 
Code 


None 
None 
N/A 


None 
None 
None 
None 


12 


12 
None 
None 


None 
None 
None 
None 


None 
None 
None 
None 
None 


oem co 


Meaning 


Processing completed normally. 
STOP command was issued. 


Normal completion. 
STOP command. 


Normal completion. 
GTF termination requested. 


Norma! completion. 

Invalid length; less than 1 or 
greater than 256. 

Invalid data address. 

Invalid FID. 

Invalid EID. 

Not enough space in GTF buffers. 
Invalid parameter list address. 
Data was paged out. 


Could not take SDUMP. 
SDUMP was issued. 
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Section 6: GIF Macro Instructions 


AHLREAD 


AHLSTACK 


GTRACE 


The AHLREAD macro instruction causes scheduling of the AHLREADR routine 
to request transfer of trace data requested by the ABDUMP/SNAP or SVC 
Dump routine. It builds a parameter list for the routine (AHLREADR) which 
locates GTF in storage and queues the data transfer request. 


The AHLSTACK macro instruction is used by the GTF record-build routines to 
cause the 16-byte prefix for a trace record to be constructed. The prefix is placed 
immediately preceding the trace data in the record-builder’s work area. The 
record-blocking routine (AHLSBLOK) is called to initiate the blocking-buffering 
process. 


IBM users and components issue the GIT RACE macro instruction to cause trace 
data that they have collected to be placed in the GTF trace buffers. GTF will not 
accept user or component data unless the GIF options in effect include 
TRACE= USR or TRACE= USRP. 


The GIRACE macro instruction has six parameters: the main storage address of 
the data to be recorded, the number of bytes to be recorded, the format identifier 
(FID) that indicates the routine that will process the user or component entry 
when the trace output is edited by AMDPRDMP, the ID of the user or 
component that built the record, specification of whether paged-out data should 
be obtained for recording (PAGEIN = YES/NO) and a TEST parameter. When 
TEST = YES 1s specified, GITRACE determines if GTF is active for the user event 
that the ID parameter specifies. The IHLMGTRC mapping macro instruction 
generates symbolic names equated to all assigned user/component ID values. For 
a description of the format of the GTRACE instruction, refer to Service Aids. 


If PAGEIN= YES was specified, code generated by the expansion of the 
GTRACE macro instruction will cause the paged-out data to be paged in and the 
GTRACE to be issued. IF PAGEIN = NO was specified and a page fault occurs 
during the access of user data, GIF passes a return code of X‘20’ and no record 
is built. 


The GIRACE macro instruction may be implemented in standard, list, or execute 
form. The standard form generates a monitor call (MC) instruction (see Section 
7). The list form generates a parameter list for the GTRACE parameters, and the 
execute form changes the values of the parameters in the list. The TEST 
parameter is only valid on the standard form of the GTRACE macro. 
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HOOK 





The HOOK macro instruction is used by system routines to communicate with 
GTF as follows: 


@ The first level interruption handlers (FLIHs), the I/O supervisor, the 
dispatcher, the SVC exit prolog, the system resource manager, and the 
recovery/termination manager issue the HOOK macro instruction to notify 
GTF of the occurrence of system events that GIF recognizes for tracing. A 
HOOK issued by these routines is called a trace hook into GTF. 


The HOOK macro instruction has two parameters used in the following 


format: 
Pp 
HOOK EID = symbolic name[,TYPE = T ] 
BP 
BT 
BPN 


@® EID=symbolic name — is the event identifier (EID) for the event that caused 
the HOOK to be issued. The EID is given as a symbolic name that is 
equated to a hexadecimal value. For a list of the EID symbolic names and 
their hexadecimal equivalents, refer to the “Diagnostic Aids” section of this 
chapter. 


@® TYPE=P -— causes the HOOK macro instruction to generate a monitor call 
(MC) instruction (see Section 7). The assembler converts the symbolic name 
EID to its hexadecimal equivalent of the form X‘OcOddd’, where c is the class 
and ddd is the displacement that is put into the MC instruction. The 
following MC instruction is generated when TYPE=P is the parameter: 





Instruction 1 (MC instruction) - 


OP code: X'AF'. 
I2: Bits 0-3 = B'OOOO'. 
Bits 4~7 = c (event class). 
Bl: B'OOOO'. 
D1: ddd (event ID). 


@® TYPE=T — causes the HOOK macro instruction to generate the MC 
instruction shown under TYPE=P, but only if a designated assembler global 
switch is set in the line of the associated module assembly. 


@ TYPE=BP — causes the HOOK macro instruction to generate a branch into 
the MC routing-facility module AHLMCIH without generating an MC 
instruction. This parameter is used by the PFLIH for all program 
interruptions. The following three instructions are generated when 
TYPE=BP is the parameter: 
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Instruction 1 (load instruction) - 


OP code: X' 58! 

Rl: X'F' (register 15 points to AHLMCIH). 
B2: r (base register). 

D2: ddd (displacement). 


L 15,IEACONI] 


Instruction 2 (BALR instruction) - 


OP code: x'O5! 

Rl: X'E' (register 14 points to NSI after 
execution). 

R2: X'F' (register 15 points to AHLMCIH). 


Instruction 3 (NOP instruction) - 


OP code: X'47'. 

R1: B'OOOO'. 

X2: c (event class). 
B2: B'OOOO'. 

D2: ddd (event ID). 


@ Type=BPN — causes the HOOK macro instruction to generate a branch into 
the MC routing facility module AHLMCIH without generating an MC 
instruction. This parameter is used by non-PFLIH routines to enter module 
AHLMCIH through secondary entry point AHLMCIHB. The sequence of 
instructions generated is the same as for TYPE=BP except that the LOAD 
instruction is from JEACON2. (JEACON2 ts a V-type address constant for 
AHLMCIHB.) 


@® Type=BY — causes the HOOK macro instruction to generate the three 
instructions shown under TYPE=BP, but only if a designated assembler 
global switch is set in the line of the associated module assembly. 


IHLMGTRC 
The IHLMGTRC macro instruction is mapping macro that generates symbolic 
names equated to hexadecimal values for IBM components that use the GTRACE 
macro instruction. The component specifies its assigned symbolic name as the 
operand of the ID=keyword in the GT RACE macro instruction. 

SETEVENT 


The SETEVENT macro instruction is issued by users of the MC instruction (for 
example, GIF) as an interface to the MC routine facility. The MC routine 
facility passes control to the proper event handler when a requested MC 
instruction is issued, Expansion of the macro instruction causes building of a 
parameter list for the SETEVENT service. This service then does the actual 
manipulation of the MC routing facility to perform the requested function. 
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Section 7; Monitor Call (MC) Instruction 2 


The monitor call (MC) instruction is a maskable interruption instruction. Both 
the HOOK and GTRACE macro instructions generate the MC instruction to pass 
control to GIF. The format of the MC is: 


SI format — MC D,(B,),1, 


© 


8 16 20 31 


Each monitoring event 1s defined by the low order four bits of the J2 filed, known 
as the class of the event, and by the sum of D, and B,. The GTF event identifier 
(EID) is two bytes of the form cddd where c is the class of the event and ddd is 
the event within the class. The GTF EID corresponds to the fields of the MC 
instruction as follows: 


MC instruction format 


oS 


8 16 20 31 


MC instruction for GTF 


AF C ddd 





oS 


8 12 16 20 31 


(Monitor call instructions generated by either the HOOK or GTRACE macro 
instructions for GTF always contain a B, value of zero.) 
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Chapter 2. Module Map and IDR List (AMBLIST) 


Section 1: Introduction 


Functions 


AMBLIST is a linkage-editor service aid program that provides the user with 
formatted listings for use in problem determination. AMBLIST operates as a 
problem program under MVS/XA. 


The main functions of AMBLIST are: 

@ Producing formatted object module listings. 
Producing formatted load module listings. 
Producing formatted nucleus listings. 


Producing load module maps and cross-reference listings. 


Formatting the information in the CSECT identification records (IDRs) of a 
load module. 


@ Producing a formatted link pack area map. 


An object module listing contains the text of the module, that is, its instructions 
and data in hexadecimal representation, and the END record. It also contains the 
external symbol dictionary (ESD) and the relocatable load dictionary (RLD). 


The contents of a load module listing vary according to the options selected by 
the user. A load module listing (including the nucleus) may contain the control 
and test records of the stored load module, including the external symbol 
dictionary and the relocatable load dictionary, scatter and translation tables, 
IDRs, a module map, and a cross-reference listing. 


The CSECT identification records (IDRs) can be formatted and listed. The user 
can request that all IDRs be displayed or that just those IDRs containing 
AMASPZAP service aid program data and those containing optional 
user-supplied data be displayed. If a translator supports IDR, the translator, its 
version and modification level, and the date of translation for a particular control 
section are recorded in the IDR translator data records (subtype 04). The IDR 
linkage-editor record (subtype 02) contains information pertaining to the 


LY28-1189-2 © Copyright IBM Corp. 1982 1985 Chapter 2. Module Map and IDR List (AMBLIST) 2-1 


Environment 


Storage Requirements 


Contains Restricted Materials of [IBM 
Licensed Materials — Property of IBM 


linkage-editor that constructed the load module: its version, modification level, 
and date of load module creation. AMBLIST also lists any user-supplied data 
associated with the executable code of a control section recorded in IDR user data 
records (subtype 08). The modifications that AMASPZAP performed on a 
specified control section of a load module, including the date and the specific data 
modified, are recorded in the IDR AMASPZAP data records (subtype 01). 


AMBLIST resides in the system library. AMBLIST is executed as a job step 
through specification on an EXEC Job control statement in the input stream; or it 
receives control through the execution of a LINK, LOAD, ATTACH, or XCTL 
macro instruction. 


Input to AMBLIST consists of object modules or load modules plus control 
statements. Control statement input is defined by the SYSIN DD statement. The 
DDN option in a control statement (or the default name of SYSLIB) specifies the 
name of the DD statement defining the sequential or partitioned data set 
containing the module(s) optionally designated as input in the control statement. 
Output from AMBLIST is the listings requested by the control statement plus any 
diagnostic messages. The output from AMBLIST goes to any user-defined data 
set defined in the SYSPRINT DD statement. 


AMBLIST is operational in the minimum configuration required for MVS/XA. It 
requires a minimum of 64K bytes of storage. Static data and instructions require 
36K bytes of storage, the remainder of the 64K bytes of storage is dynamic 
storage, including an allowance for non-resident access method routines. 


Physical Characteristics 


AMBLIST is a reenterable program and consists of a control module, five 
processing modules, two diagnostic modules, and an open exit module for 
SYSPRINT: 


Control module: HMBLKCTL. 

Load module processing module: HMBLKLDM. 

Map and cross-reference processing module: HMBLK XRF. 
Object module processing module) HMBLKOBIJ. 

Link pack area mapping module: HMBLKLPA. 

CSECT identification record processing module: HMBLKIDR. 
Error message wnter: HMBLKERR. 

Text of error messages: HMBLKMSG. 

Open exit module for SYSPRINT: HMBLKSZE. 


Each of these modules consist of a single external procedure, except for 
HMBLKMSG, which is a CSECT containing two tables. 


HMBLKCTL examines the input stream contro] statement (from the SYSIN data 
set) and determines which of the five processing modules must be called. 
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Operational Considerations 


Operation of AMBLIST depends upon the type of input received and on the user 
options specified. The control statements in the input stream re in the format of 
an operation and its applicable operands. The formats are shown in Service Aids. 
The control routine scans the control statement and turns on the appropriate 
switches in the OPTNMAP map to indicate which routines are to be used. 
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Section 2: Method of Operation J 


This section shows how AMBLIST provides the user with formatted listings. As 
shown in LIST Figure 2-1, the description begins with an overview, then describes 
the following stages of overall processing: 


@® Control processing (MO1). 
@ Listing processing (MO2 - MOS). 
@ Diagnostic processing (MO6). 


Reading Method of Operation Diagrams 


Method of operation diagrams are arranged in an input-processing-output layout; 
the left side of the diagram contains the data that serves as input to the processing 
steps in the center of the diagram, and the right side contains the data that is 
output from the processing steps. Each processing step is numbered; the number 
corresponds to the verbal description of the step in the extended description. 
While the processing step in the diagram is in genera! terms, the corresponding 
text 1s a specific description that includes a cross-reference to the code for the 
processing. 
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AMBLIST 


Diagram 1 Diagram 2 Diagram 3 Diagram 4 Diagram 5 Diagram 6 


Control Load and Object Map and Cross- Link Pack IDR Listing Diagnostic 
Processing Module Listing Reference Area Listing Processing 





Key to Method of Operation (MO) Diagram Symbols 


Entry into processing 1, 2, etc. Look for corresponding numbers in text 


A, B, etc. Look for blow-up of item on same page 
Flow of Control 


Look for corresponding-lettered blow-up 
on same page 


Doto Tronsfer 





Braces to denote reloted items 


> 


or Pointer to or address of 


See referenced diagrom for detailed 
description 


Reference to dato 
Reference to another diagram 


Figure 2-1. Key to Method of Operation Diagrams for ABMLIST 


| 
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LIST Diagram 1. AMBLIST Control Processing (Part 1 of 2) 


Input 


// EXEC PGM=AMBLIST 


From MVS Process 





/ISYSIN DD* 


LIST... 









Control Statements 


LISTLOAD OUTPUT= 


LISTIDR 


LISTLPA 


TITLE= 
DDN= 
MEMBER= 


TITLE= 
DDN= 
MEMBER= 


OUTPUT= 
TITLE= 
DDN= 
MEMBER= 


Se 


Control Processing 


1 Validate control statements and 
set switches in OPTNMAP. 


2 Input 
Open Ouisut Data Set 





Control Processing for Load Modules 


3 Analyze linkage editor attri- 
butes and set switches in 
ATNAME., 


4 Search partitioned data set 
directory. 


5 Print module summary. 


EOF Processing 


6 Return control to system, 


Module 


Processing 





iy 


Module 
Processing 


RETURN to 
Operating System 


Output 


OPTNMAP 


OPERATIONS 
OPERANDS 
OPTIONS 


ATNAME 
ATON 


ATOFF 


Alias Indicator 
PDS 


| Member or Alas Name 
[TT rel dor of tat Text Record | 
i ee i 1 
ee 2 


//SYSPRINT 
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LIST Diagram 1. AMBLIST Control Processing (Part 2 of 2) 


Extended Description 


1 ~=*«*The user can specify four operations in the AMBLIST 


control statement. Each of these operations has 
several associated operands. See (A) for a diagram 
of the operations and operands. (A detailed discussion 
of the operations, operands, and options associated 
with the operands and their meanings Is given in 
Service Aids.) HMBLKCTL analyzes and validates 
the control statements and sets the appropriate 
switches in OPTNMAP. 


e If LISTLOAD or LISTIDR is specified, HMBLKCTL 
performs the processing listed in steps 2, 3, and 4. 


@ When LISTOB, is specified on the control statement, 
HMBLKCTL performs step 2. 


e lf anerror is discovered, HMBLKCTL passes control 
to the error processing routine HMBLKERR (MO 5). 


2 There is one output data set SYSPRINT, which 
contains all the output of AMBLIST. 


3. =The linkage editor attributes specified in the 
directory entry are analyzed and the appropriate 
switches are set in ATNAME. 


A HMBLKCTL scans the partitioned data set (PDS) 

directory for aliases and secondary entry point 
addresses, for the system status index (SSI), for the 
access code (APF), and for the main entry point address 
of the load module. 


5H Amodule summary is prepared by HMBLKCTL for 


the first page of an output listing for a load module. 


{A detailed discussion of the contents of the module 
summary is found in Service Aids. ) 


G When there are no more control statements to be 
processed, dynamic storage is released and control 
is returned to the operating system, 


Module 


HMBLKCTL 


HMBLKCTL 


HMBLKCTL 


HMBLKCTL 


HMBLKCTL 


HMBLKCTL 


HMBLKCTL 


HMBLKCTL 


Label 


AAHT1 


AAHT1 


AAH1 


AAAT 


PDSREAD 


CHOW 


ENDIT 
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LIST Diagram 2. Load and Object Module Listing (Part 1 of 2) 


Input 


From MO1 


LISTLOAD OUTPUT=.. .,. TITLE=... 
DDN=. ...MEMBER-... 


LISTOBJ TITLE=. 





[ 
DDNe=., .., MEMBER=... 
7 Data Set 





Data Set 
Containing 


Load 
Modules to 
Be Listed 


Containing 


Object 
Modules to 
Be Listed 


Process 


] Print heading and user title, if 
specified. 


2 Read load module records, 
perform necessary conversions, 
and print records on SYSPRINT. 


3 Read object module records, 
perform necessary conversions, 
and print records on SYSPRINT. 


Mon Control Processing 


Type of module 
listing 
user title 


TESTRAN data 
CESD data 


TESTRAN data 
ESD data 
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LIST Diagram 2. Load and Object Module Listing (Part 2 of 2) 


Extended Description Module 
1 The address of the data set containing the HMBLKLDM/ 
module(s) to be listed and the address of HMBLKOBJ 


SYSPRINT are obtained from the parameter list 
passed from HMBLKCTL. The heading, indicating 
which type of module listing follows, and the user 
title, if specified, are written in SYSPRINT. 


2. The records are read in order from the data HMBLKLDM/ 
set specified on the control statement. Some HMBLKOBJ 

data items within the records are converted. See 

the Data Conversions table for details. Finally, 

the records are written in SYSPRINT. (Records 

are read, converted, and printed one by one.) 


3.2 sCAfter all records have been listed, control HMBLKLDM/ 
is returned to HMBLKCTL. If error condi- HMBLKOBJ 

tions arose during processing they are indicated 

in the ERRORS bit map in HMBLKCTL, and 

diagnostic processing ensues. Otherwise, 

HMBLKCTL handles the next user request. 


Label 


BEGIN/ 
INITID 


EOJX/ 
OBJEOF 
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LIST Diagram 3. Map and Cross-Reference Listing (Part 1 of 2) 


Input 


LISTLOAD 


OUTPUT=XREF 
TITLE= 
or 


From MO1 





> 





DON=, MEMBER= 


Data Set 
Containing 


Load 
Module 





ly 


Process Output 


Print heading and user title, if Type of listing 
specified, User title 





CESDTAB 
RLDTAB 
SCATTAB 
TRANTAB 





Numerical map and 


cross-reference listing 
Pseudo register data 


INDEXTAB 


Read records and build tables. 






Build numerical index; print 
numerical map and listing. 





Build alphabetic index; print 


Alphabetic map and 
alphabetic map and listing. P : 


cross-reference listing 
Pseudo register data 


Mon Control Processing 
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LIST Diagram 3. Map and Cross-Reference Listing (Part 2 of 2) 


Extended Description 


1. ‘The address of the data set containing the load 

module to be processed and the address of 
SYSPRINT are obtained from the parameter list 
passed from HMBLKCTL., The heading, indicating 
which type of listing follows and the user title, if 
specified, are printed on SYSPRINT. 


2 Read load module, enter CESD records in 

CESDTAB, enter RLD records in RLDTAB. 
If the load module is a nucleus, enter translation 
records into TRANTAB, enter scatter records into 
SCATTAB. All other records are ignored. If any 
table overflows, processing is terminated and control 
is returned to HMBLKCTL. When the load module 
is a nucleus, CESDTAB and RLDTAB addresses are 
converted to loaded addresses using the SCATTAB 
and TRANTAGB entries. End of input is indicated 
by the end-of-module (EOM}) indication. 


3 The CESDTAB is sorted into ascending numer- 

ical sequence according to the segment number 
and the address of the CESDTAB symbol. The 
INDEXTAB is built using the CESDID of each 
CESDTAB entry. The RLDTAB is sorted into 
ascending numerical sequence according to the 
address contained in the RLDTAB entry. 


The segment numbers (in CESDTAB entries) are 
converted to the EBCDIC code for decimal digits; 
addresses (in CESDTAB or RLDTAB entries) are 
converted to EBCDIC code for hexadecimal digits. 
A numeric module map and cross-reference are then 
printed. If the load module is in overlay format, 
the above data is printed seqment by segment, 
beginning with segment 1. Finally, pseudo 

register data is printed. 


Module 


HMBLKXRF 


HMBLKXRF 


HMBLKXRF 


HMBLKXRF 


HMBLK XRF 


Label 


AUTOINIT 


WRITE1 


READ 


NUC 


NCSORT 


NRSORT 


NACESD 


WRITE 


C 


Extended Description 


4 The CESDTAB is resorted into ascending 
alphabetic sequence according to the 
CESDTAB symbol. The INDEXTAB is rebuilt 

using the CESD ID of each CESDTAB entry. 


Data is converted as in step 3. An alphabetic 
module map is then printed. To print an alpha- 
betic cross-reterence listing ordered by symbol 
referred to, R pointers (from the RLDTAB) are 
sought to match ESD identifiers in the CESDTAB 
entries. When a match is found, a cross-reference 
line is converted and printed. 


After all listings have been printed, control is 
returned to HMBLKCTL. If error conditions 
arose during processing, they are indicated in 
the ERRORS bit map, and diagnostic processing 
ensues. Otherwise, HMBLKCTL handles the 
next user request. 


Module 


HMBLKXRF 


HMBLKXRF 


HMBLKXRF 


( 


Label 


ACSORT 


NACESD 
ARLD 


WRITE 


FINISH 


WAI Jo Ajsadoig — speliaye]A] pasuaary] 


WGI JO S[eajeyA] payouiysay sureju07 


OIdO'T Sply 2dIAIIg aINJOOWYOIW Pepurixg/SAW TI[-Z 


S861 7861 ‘oD Way WysuAdoDd © 7-681I-8ZTAT 


Input 


LISTLPA 













TS | CBuild table using link pack 


LIST Diagram 4. Link Pack Area Map Listing (Part 1 of 2) 


From Mot Process Output 






Perform steps 1 through 3 for each 
map requested: 








CDETAB 
directory information. 














Numeric Map 
in Hexadecimal 





2 Print numeric link pack area 
map. 





Alphabetic Map 
in Hexadecimal 





3 Print alphabetic map. 





Wal Jo Ajsedoig — s[elia}8yAl posuacry] 
NG] JO STRLIOBIA, PaydLysay surE}U0D) 


C861 7861 ‘LI0D Wal 143uUAdoD © 7-68II-8ZAT 


(LSITEWY) 38'T UCI pue dew sinpow ‘7 JaydeyD 


tI-2 


C 


LIST Diagram 4. Link Pack Area Map Listing (Part 2 of 2) 


Extended Description Module Label 


1 if the FLPA and/or MLPA is being processed, HMBLKLPA HMBLKLPA 
HMBLKLPA searches the active link pack 

directory entry chain for entries pointing to modules 

in the FLPA and/or MLPA and their extensions. 

Otherwise, HMBLKLPA uses the pointer in the 

CVT (CVTLPDIR) to get the entries for the PLPA 

and its extension. 


AMBLIST builds the CDETAB using the link pack HMBLKLPA 
directory information. The name, entry point, 
and length are moved to the CDETAB. 


2 The CDETAB is sorted numerically by 
module location. 


3 The CDETASB is resorted alphabetically by 
module name. 
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LIST Diagram 5. IDR Listing (Part 1 of 2) 


Input From MO1 Process Output 





LISTIDR OUTPUT= 


TITLE= Print heading and user title, if 


DDN= ” 
specified. 
MEMBER= peci' 


MODLIB= 


2 scan CESD records and build CSDTAB 
CSDTAB. a a 


! 
| 
| 
Data Set 3 Read IDR records. | ZPRINT 
| 
| 
| 








Containing 4 Process |OR record according 
Load to data type: 


Module 


e AMASPZAP —sortand 
print data 





@ Linkage editor — print data 


print data 


® User data — sort and print “*~ 


data. 


@ Translator — correlate and TRNPRNT YS 


IDPRINT 





LINKOUT [[__________ 


Type of Listing Page 
User Title 


CSECT Name, 
Date of AMASPZAP 
Modification, 


AMASPZAP Data 


Program Name, 
Linkage Editor 
Version and Level, 
Date of Load 
Module Creation 





CSECT Name, 
Translator Name 
Version, Compile Date 


CSECT Name, 
Date of Data Entry, 
User-Supplied Data 
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LIST Diagram 5. IDR Listing (Part 2 of 2) 


Extended Description Module 


1 =‘ The address of the data set containing the load HMBLKIDR 
module whose |DR’s are to be listed and the 

address of SYSPRINT are obtained from the param- 

eter list passed from HMBLKCTL. If the MODLIB 

keyword was specified, only user data and 

AMASPZAP data are printed. Printing of the 

module summary is suppressed. The head, indicating 

which type of listing follows and the user title, if 

specified, are printed on SYSPRINT. 


2 Only CESD records containing SD (section 
definition) or PC (private code) entries are 
processed. The symbolic names and ESD identifiers 
from these records are entered in the CSDTAB table. 


HMBLKIDR 


3 Read IDR records and determine what type of 
data they contain and then process accordingly. 


HMBLKIDR 


Label 


PRNT1 


CESDRT 


IDRTN 


C 


Extended Description 


4 Inthe following processing, the ESD identifier 

from the IDR is used to search the CSDTAB. 
The CSECT name associated with the matching ESD 
identifier in the CSDTAB is then printed with the 
IDR data. 


e@ AMASPZAP data — Get CSECT name from 
CSDTAB and enter it and AMASPZAP data in 
SORTAB, sort SORTAB alphabetically by CSECT 
name, and print data from the ZPRINT output 
area to SYSPRINT. 


@ Linkage editor data — The data is printed from 
the LINKOUT output area to SYSPRINT. 


e Translator data — Get CSECT name from CSDTAB 
and enter it in TRNTAB. Enter translator data in 
TOTAB; correlate TRNTAB and TDTAB entries 
and print data from the TRNPRNT output area to 
SYSPRINT. 


e User data — Get CSECT name from CSDTAB and 
enter it and user data in IDENTDAT, sort 
IDENTDAT alphabetically by CSECT name, 
and print data from the IDPRINT output area. 


The last IDR is identified by a flag in the subtype 
field, After all |DRs have been listed, control is 
returned to HMBLKCTL. If error conditions arose 
during processing, they are indicated in the ERRORS 
bit map in HMBLKCTL, and diagnostic processing 
ensues. Otherwise, HMBLKCTL handles the next 
user request. 


Module 


HMBLKIDR 


HMBLKIDR 


HMBLKIDR 


HMBLKIDR 


HMBLKIDR 


Label 


ZAPRT 


LKERT 


TR1 


IDENRT 


RET 
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LIST Diagram 6. Diagnostic Processing (Part 2 of 2) 


Extended Description Module Label 


1  HMBLKERR obtains the address of the HMBLKERR 
SYSPRINT DCB from the parameter list 
(PARMLIST) passed from HMBLKCTL. 


2 ™MHMBLKERR then prints the title ‘Diagnostic HMBLKERR 
Directory’ at the top of a listing page. 


3.2 sCThe bits in ERRORS, a bit map defined in HMBLKERR 
HMBLKCTL are checked. Bits were set to 

1 if HMBLKCTL, HMBLKLDM, HMBLKXRF, 

HMBLKOBJ, or HMBLKIDR detected errors. 


If a bit is set to 1, the associated message text is HMBLKERR 
obtained from the MESSAGES and MSGLIST 

tables in HMBLKMSG and printed on SYSPRINT. 

After all error messages have been printed, control 

is returned to HMBLKCTL and the next user request 

is processed. 
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Section 3: Program Organization 


This section describes the organization of the AMBLIST program. It contains: 


@ A description of the module organization (see Figure 2-2). 


@ Descriptions of each AMBLIST module, in alphabetical order by object 
module name. 







HMBLKCTL 








HMBLKERR 





HMBLKIDR HMBLKLDM HMBLKLPA HMBLKOBJ HMBLKXRF 














HMBLKSZE 





Figure 2-2. AMBLIST Module Organization 


Module Descriptions 


HMBLKCTL — Control Module 
Entry from: The scheduler when AMBLIST is invoked. 
Data areas defined or updated: OPTNMAP, ERRORS. 


Routines called: HMBLKLDM, HMBLKPA, HMBLKXRF, HMBLKOBJ, 
HMBLKIDR, HMBLKERR. 


Exits: At end-of-file for the SYSIN data set, return to the operating system. 
MOs: 1. 


Operation: Validates the control statement and passes control to the appropriate 
processing routine. It also passes control to the error message printer 
(HMBLKERR). 
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HMBLKERR — Error Message Printer 


Entry from: HMBLKCTL. 

Data areas defined or updated: None. 

Routines called: MESSAGES and MSGLIST in HMBLKMSG. 
Exits: Return to HMBLKCTL. 

MOs: 6. 


Operation: Obtains the message text from HMBLKMSG and prints the message 
in SYSPRINT. 


HMBLKIDR — CSECT Identification Record Processing Module 


Entry from: HMBLKCTL. 


Data areas defined or updated: CSDTAB, IDENTAB, SORTAB, TDBAB, 
TRNTAB. 


Routines called: None. 
Exits: Return to HMBLKCTL. 
MOs: 5. 


Operation: Reads IDR records, correlates CSECT names with data if necessary, 
and prints the IDR data in SYSPRINT. 


HMBLKLDM — Load Module Processing Module 


Entry from: HMBLKCTL. 

Data areas defined or updated: None. 
Routines called: None. 

Exits: Return to HMBLKCTL. 
MOs: 2. 


Operation: Reads load module records, performs conversions, and prints the 
records in SYSPRINT. 
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HMBLKLPA — Link Pack Area Mapping Module 





Entry from: HMBLKCTL. 
Data areas defined or updated: CDETAB. 
Routines called: None. 
Exits: Return to HMBLKCTL. 
MOs: 4. 
Operation: Products a formatted listing of the link pack directory entries that 
reside in the fixed link pack area, modified link pack area, pageable link pack 
area, and their extensions. 
HMBLKMSG — Text of Error Messages 
Entry from: HMBLKERR. 
Entry point names: MESSAGES, MSGLIST. 
Data areas defined or updated: MESSAGES, MSGLIST. 


Routines called: N/A. 


Exits: N/A. 





MOs: 5. 


Operation: This nonexecutable module contains the two tables MESSAGES and 
MGLIST. 


HMBLKOBJ — Object Module Processing Module 
Entry from: HMBLKCTL. 
Data areas defined or updated: None. 
Routines called: None. 
Exits: Return to HMBLKCTL. 
MOs: 2. 


Operation: Reads object module records, performs conversions, and prints the 
records in SYSPRINT. 
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HMBLKSZE — Open Exit Module for SYSPRINT 


Entry from: HMBLKCTL. 

Data areas defined or updated: None. 
Routines called: None. 

Exits: Return to HMBLKCTL. 
MOs: None. 


Operation: This module is an exit list routine for the SYSPRINT DCB. 


HMBLKXRF — Map and Cross-Reference Processing Module 


Entry from: HMBLKCTL. 


Data areas defined or updated: CESDTAB, RLDTAB, INDEXTAB, TRANTAB, 
SCATTAB. 


Routines called: None. 

Exits: Return to HMBLKCTL. 

MOs: 3. 

Operation: Reads load module records, sorts, CESD and RLD records, performs 


conversions and lists the CESD and RLD records both alphabetically and 
numerically by address. Produces map and cross-reference listing of the nucleus. 
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Section 4: Data Areas 





This section contains descriptions of the following data areas built and used by 





AMBLIST modules: 

@ CDETAB 

@ CESDTAB 

@ CSDTAB 

@ ERRORS 

@® IDENTDAT 

@ INDEXTAB 

@ MESSAGES 

@ MSGLIST 

@ OPTNMAP 

@ RLDTAB 

@ SCATTAB 

@ SORTAB 

@ TDTAB 

@ TRANTAB 

@ TRNTAB 

CDETAB 

Size: 21 bytes. 

Created by: HMBLKLPA. 

Updated by: HMBLKLPA. 

Offset Size Description 

0 (0) 8 Module name. 

8 (8) 8 Major name or length and location. 

8 (8) 4 Length of module. 

12 (C) 4 Location of module. 

16 (10) 4 Entry point address. 

20 (14) l Bit settings Meaning 
l... vee Minor entry. 
Sree Major entry. 
XX = -XXXX Reserved. 

CESDTAB 

Size: 19 bytes. 

Created by: HMBLK XRF. 

Updated by: HMBLKXRF. 

Offset Size Description 

0 (0) 2 ESD identifier of symbol from CESD. 

2 (2) 8 8-character symbolic name. 
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Offset Size Description 
10 (A) ] Bit settings Meaning 
xxxx 0000 Section definition (SD). 
xxxx 001] Label reference (LR). 
xxxx 0100 Private code (PC). 
xxxx 0101 Common (CM). 
xxxx Q110 Pseudo register (PR). 
xxxx 0010 External reference (ER). 
xxxx 1010 Weak external reference (WX). 
xxx] x100 Private code marked delete (PD). 
1] (B) 4) Address of symbol. 
15 (F) J Segment number in which the symbol appears. 
16 (10) 3 Either chain ID or length of the CSECT from CESD. 
CSDTAB 
Size: 12 bytes. 
Created by: HMBLKIDR. 
Updated by: HMBLKIDR. 
Offset Size Description 
0 (0) 8 CSECT name from CESD. 
8 (8) 2 Reserved. 
10 (A) 2 ESD identifier from CESD. 
Errors 
Size: 32 bits. 
Created by: HMBLCKCTL. 
Updated by: HMBLKLDM, HMBLKLPA, HMBLKXRF, HMBLKOBJ, 
HMBLKIDR, HMBLKCTL. 
Size: HMBLKERR. 
Errors 1s a 32-bit map. Bits 0 through 31 are correlated to error messages 1 
through 32. 
IDENTDAT 


Size: 51 bytes. 
Created by: HMBLKIDR. 


Updated by: HMBLKIDR. 


Offset Size Description 

0 (0) 8 CSECT name associated with the ESD identifier in the IDR 
record. 

8 (8) 3 Date on which user data was supplied to the load module via 
the linkage editor identify function. 

aI (B) 40 User-supplied data as specified in the linkage editor identify 


control statement. 
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INDEXTAB ) 
Size: 2 bytes. 
Created by: HMBLKXRF. 


Updated by: HMBLKXRF. 


Offset Size Description 


0 (0) 2 Pointer to a CESD table line. An ID chain pointer, R 
pointer, or P pointer is used as an offset into the index table 
to find a vajue which is used as an offset into the CESD table. 


MESSAGES 
Defined in: HMBLKMSG. 
Used by: HMBLKERR. 
MESSAGES 1s a table containing the text of the error messages. The length of 
an entry (MSGxx) in MESSAGES can be obtained from the second halfword of 
the corresponding entry in MSGLIST. For example, the length of MSGO1 can be 
obtained from LST01 in MSGLIST. 
MSGLIST 
Size: Maximum of 32 4-byte entries. 
Defined ins HMBLKMSG. 
Used by: HMBLKERR. 
Offset Size Field Description 
0 (0) 4 LST01 The first two bytes contain the offset in bytes of the message 
text from the beginning of MESSAGES. The second 2 bytes 
contain the length of the message text in MESSAGES. 
4 (4) 4 LST02 Same as above. 
OPTNMAP 


Size: 32 bits 
Created by: HMBLKCTL. 
Updated by: HMBLKCTL. 


Used by: HMBLKCTL. 


Bit Field Description 

0 LISTLOAD LISTLOAD operation specified. 
l LISTOBJ LISTOBJ operation specified. 

2 LISTIDR LISTIDR operation specified. 

3 LISTLPA LISTLPA operation specified. 
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RLDTAB 


Size: 9 bytes. 


Field 


TITLE 
DDN 
MEMBER 
MODLIST 
XREF 
IDENT 

PO 
LASTMEM 
LIMIT 
MCONTIN 
RELOC 
Reserved. 


Description 


TITLE operand specified. 
DDN operand specified. 
MEMBER operand specified. 
LIST option specified. 
XREF option specified. 
IDENT option specified. 
Partitioned data set (PDS). 
Last member name indicator. 
Too may member names. 
MEMBER option continuation. 
Relocation factor given. 


Updated by: HMBLKXRF. 


Used by: HMBLKXRF. 


Offset Size 
0 (0) 2 
2 (2) 2 
4 (4) 1 


5 (5) 4 
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Description 
Entry number of the CESD entry (or translation entry) that indicates which 


symbol value is to be used in the computation of the address constant’s 
value. 


Entry number of the CESD entry (or translation table entry) that indicates 
which CSECT contains the address constant. 


Flags: When byte format is xxxx LLST, xxxx specifies the type of this RLD 
item (address constant): 


0000 — nonbranch-type is assembler language. DC A (name). 

0001 — branch-type in assembler language. DC V (name). 

0011 — pseudo register cumulative displacement value. 

1000 and 1001 — this address constant is not be replaced because it refers to 
an unresolved symbol. 


LL specifies the length of the address constant: 


01 — two-byte. 
10 — three-byte. 
11 — four-byte. 


S specifies the direction of relocation: 


0 — positive 
1 — negative. 


T specifies the type of the next RLD item: 


0 — the following RLD item has a different relocation and/or position 
pointer. 
1 — the following RLD item has the same relocation and position 


pointers as this and therefore is omitted. 
Address of the address constant. 
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SCATTAB 


SORTAB 


TDTAB 


TRANTAB 


Size: 4 bytes. 


Created by: HMBLKXRPF. 


Offset Size 
0 (0) 1 


Size: 19 bytes. 
Created by: HMBLKIDR. 


Used by: HMBLKIDR. 


Offset Size 
0 (0) g 
8 (8) 3 
11 (B) g 


Size: 15 bytes. 
Created by: HMBLKIDR. 


Used by: HMBLKIDR. 


Offset Size 
0 (0) 10 
10 (A) 2 
12 (C) 3 
Size: 2 bytes. 


Created by: HMBLKXRF. 


Offset Size 
0 (0) 2 
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Description 

RSECT, RMODE flag byte 
\ ee RSECT. 

sks a RMODE. 

XXXX  ..XX Reserved. 


Address assigned by linkage editor to a control section (SD, 
PC, or CM). 


Description 


CSECT name associated with the ESD identifier in the IDR 
record. 

Date on which AMASPZAP modification was performed on 
module. 

Data specified during AMASPZAP processing. 


Description 
Translation name. 


Version and modification level information (VVMM). 
Date of translation (YYDDD). 


Description 


Pointer to the scatter table entry that contains the address of 
the contro! section containing this CESD table entry. 
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( TRNTAB 


Size: Variable number of 8-byte entries. 
Created by: HMBLKIDR. 


Used by: HMBLKIDR. 


Offset Size Description 
0 (0) 8 CSECT name associated with the ESD identifier in the IDR record. 
8 (8) 8 Same as above. 


The end of the table is marked by blanks. 
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Section 5: Diagnostic Aids J 


This section contains the following information that will help to diagnose 
problems in AMBLIST: 


@ A summary of register activity. 
@ A description of the SYNAD routines of the AMBLIST control] module. 


Note: Refer to System Messages for message numbers, message text, and 
detecting, issuing, and containing modules. 


Register Activity 





HMBLKCTL 
Register Use 
] Pointer to parameter lists. 
2 Third base register for addressing static data and code. 
4 Pointer to BLDL list. 
5 Base register for addressing DCB DSECT. 
6 Base register for addressing PDS directory DSECT. 
7 Second base register for addressing static data and code. 
9 Column pointer for scanning control cards. 
1] First base register for addressing static data and code. 
12 Base register for addressing the dynamic storage area. 
13 Save area address. 
14 Linkage register for internal calls. 
15 Branch register for external calls. 
HMBLKIDR 
Register Use 
] Pointer to parameter list and to output DCB. 
2 Pointer to input buffer and to data to be converted. 
3 Pointer to input DCB. 
1] Base register for addressing static data and code. 
12 Base register for addressing the dynamic storage area. 
13 Save area address. 
15 Branch register for external calls. 
HMBLKLDM 
Register Use 
] Pointer to parameter list and to output DCB. 
2 Pointer to input DCB or a work register. 
3 Pointer to input buffer or a work register. 
4 Return address from print subroutine. 
5 Return address from conversion subroutine. 
6 Line count. 
7 Loop control register. 
L] Base register for addressing static data and code. 
12 Base register for addressing the dynamic storage area. 
13 Save area address. 
14 Linkage register for internal calls. 
15 Branch register for external calls. 
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HMBLKLPA 


HMBLKOBJ 


HMBLKXRF 


SYNAD Routine — HMBLKCTL 


Register 


10 


Register 


| 
2 


lA & WwW 


\O 


[2 
13 
14 
[5 


Use 


Pointer to parameter Jist. 
Base for contents directory block. 
Pointer to packed data. 


Use 


Pointer to parameter list. 

Pointer to input buffer and to output DCB, or work register. 
Pointer to output buffer and to input DCB, or work register. 
First base register for addressing static data and code. 
Second base register for addressing the static data and code. 
Base register for addressing the dynamic storage area. 

Save area address. 

Linkage for calls. 

Branch register for external calls. 


Use 


Pointer to parameter list and to output buffer, 

CVD instruction register, loop contro] register, pointer to 
yoput DCB and to output DCB, or index for sort. 

Pointer to input buffer or return address for branches within HMBLKXRF. 
Third base register for addressing static data and code. 
Pointer to current CESD table line being processed. 

Second base register for addressing the static data and code. 
First base register for addressing the static data and code. 
Base register for addressing the dynamic storage area. 

Save area address. 

Linkage register for internal calls. 

Used as branch register for external calls. 


When HMBLKCTL detects an uncorrectable input or output error, control is 
passed to an error analysis (SYNAD) routine. If the error occurs while processing 
a partitioned data set, the SYSIOPDS routine receives contro] and issues a WTO 
macro instruction to display an error message at the console. Control is then 
returned to the system. 
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Chapter 3. Print Dump (AMDPRDMP) 


Section 1: Introduction 


The AMDPRDMfP service aid program formats and prints the contents of the 
AMDSADMP output data set, the SYS1.DUMPnn ABEND dump data set, or 
any dumps data sets produced by SVC dump, and the GTF trace data set. 


The user controls the operation of AMDPRDMP with JCL statements and 
AMDPRDMP control statements. 


Job Control Language Statements 


JCL statements allow the user to describe: 


The input data sets, SYSIN and SYSTSIN 

The AMDPRDMfP table of contents data set, INDEX 

The AMDPRDMP output data set, PRINTER 

The AMDPRDMP message data sets, SYSPRINT and SYSTPRT 

The direct access work data set, SYSUT1 

A data set for transfer of a dump data set, SYSUT2 

The data set that contains the dump, TAPE and/or a user specified DDname 


The PARM parameter on the EXEC statement allows the user to specify: 


A title for the AMDPRDMP output listing to be requested from the console 
The number of lines per page to be printed in the output listing 
The option of stopping the AMDPRDMP processing for a function 


The action to be taken if an error occurs in an exit or format routine that is 
editing GTF records 


For a detailed description of the JCL statements for AMDPRDMP, see MVS/XA 
SPL: Service Aids. 
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AMDPRDMP Control Statements 


Control statements allow the user to specify formatting. The user enters the 
control statements into the system through either the SYSIN data set or the 
console. 


AMDPRDMP control statements introduce optional functions into this 
AMDPRDMP operation. The following are the AMDPRDMP control 
Statements: 


@® ASMDATA — causes ADMPRDMP to format and print the contents of 
auxiliary storage manager (ASM) control blocks that exist in the input data 
set. 


@ CPUDATA — causes AMDPRDMP to format and print data related to each 
processor in a dumped system. 


@ CVT — provides the address of the communications vector table if there is 
reason to believe that the CVT pointer at virtual storage location X‘4C’ in a 
virtual storage dump has been destroyed. 


@ CVTMAP — causes AMPRDMP to format and print the communications 
vector table (CVT). 


@® DAEDATA — causes AMDPRDMP to format and print the dump symptoms 
that DAE analyzes in determining whether or not to suppress the dump. 


@® EDIT — causes AMDPRDMP to obtain, format, and print trace data created 
by the generalized trace facility (GTF). 


@® END — terminates AMDPRDMP processing. 


@ FORMAT — causes AMDPRDMP to format and print the contents of the 
major system control blocks associated with each address space in a dumped 
system. 


The control statement provides for compatibility with prior versions of 
AMDPRDMP and works the same as a SUMMARY FORMAT control 
statement. 


@® GO-— causes AMDPRDMP to execute a group of control statements, which 
may be provided with the ONGO statement, making it unnecessary for the 
user to specify each statement separately. 


@ GRSTRACE or QCBTRACE — causes AMDPRDMP to format and print 
the global and local resource queue control blocks in a dumped system. 


@ IOSDATA — causes AMDPRDMP to format and print the contents of 
certain I/O supervisor (IOS) contro] blocks in the input data set. 


@ JES3 — causes AMDPRDMP to format the contents of specific control 
blocks in the JES3 address space. 
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@ LOGDATA — causes AMDPRDM*P to invoke the formatter for the 
in-storage LOGREC buffer. 


@ LPAMAP — causes AMDPRDMP to format and print a map of the contents 
of the dumped system’s link pack area directory entries (LPDE) and the 
active link pack area modules from the information in the contents directory 
entries (CDEs). 


@ MTRACE — causes AMDPRDMP to format and print the master trace table 
for the dumped system. 


@ NEWDUMP — defines a new input dump data set to AMDPRDMP. 


@ NEWTAPE — used instead of NEWDUMP to define a new tape input dump 
data set. 


@ NUCMAP — causes AMDPRDMP to format a map of the contents (name, 
entry point, entry point attributes, and length) of modules in the nucleus 
when the dump was generated. 


@ ONGO — specifies the control statements that will be executed when GO is 
issued. 


@ PRINT — causes AMDPRDMP to print and format particular areas of real 
and virtual storage. 


@ RSMDATA — causes AMDPRDMP to format and print the contents of the 
real storage manager control blocks in the input data set. 


@ SADMPMSG — causes AMDPRDMP to format and print the stand-alone 
dump console message log. 


@ SEGTAB — provides the hexadecimal real storage address of a segment table. 
If the user fails to do a store status prior to the execution of the stand-alone 
dump, the SEGTAB will not be found. 


@ SRMDATA — causes AMDPRDMP to format and print the contents of 
system resources manager control blocks (OUCBs and the Domain Table) 
that exist in the input data set. 


@ SUMDUMP — causes AMDPRDMP to invoke the formatter for summary 
dump data that an SVC dump might contain. 


@ SUMMARY — causes AMDPRDMP to print one of several reports, as 
specified by the parameters: FORMAT, KEYFIELD, JOBSUMMARY and 
TCBSUMMARY. 

@ TCAMMAP — causes AMDPRDMP to print selected TCAM control blocks. 


@ TITLE — provides AMDPRDMP with a title to be printed at the top of each 
page of the output listing. 


@ TRACE — causes AMDPRDMP to format trace entries in the system trace 
table. 
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@ VSMDATA — causes AMDPRDMP to format and print the contents of the 
virtual storage manager control blocks in the input data set. 





@ VTAMMAP — causes AMDPRDM*P to print selected VITAM control blocks. 


@ User-defined exit routines — cause AMDPRDMP to give control to a 
previously defined user or component exit module. 


AMDPRDMP Output 


Various formats may appear in the AMDPRDMP output listing, depending on 
which control statements the user selects. In addition to the formatted 
information, each page contains a heading that includes the optional 
user-specified title, the name of the module that invoked the dump (if the input 
data set was a dump data set), and the date and time that the dump was taken. 
The first page of the output lists the title given when the dump was taken. Within 
the formatted listing, comments may appear that are a result of invalid control 
blocks of AMDPRDMP’s inability to locate, format, or print a control block. 


After printing the formatted information, AMDPRDMP prints the following 
summary information: 


@ The number of entries to the read routine. 


The number of times that the required address was not found in a buffer. 





The number of blocks read from the dump data set. 


The number of permanent I/O errors encountered during execution. 


The average number of buffers used for each operation performed during 
execution. 


@ The number of GTF records read. 


@ The ratio of the number of times the read routine was called to the number of 
times the requested address was not in a buffer. 


For a detailed description of the AMDPRDMP output listing, see MVS/XA 
Debugging Handbook. 
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Section 2: Method of Operation 


This section describes how AMDPRDMP formats and prints information from an 
input data set. As shown in Figure 3-1, the description begins with an overview 
of AMDPRDMP, then describes the following stages of the overall processing: 


@ AMDPRDMP initialization. 
@ Control statement processing. 
@ Control statement execution. 


Reading Method of Operation Diagrams 


Method of operation diagrams are arranged in an input-processing-output layout: 
the left side of the diagram contains the data that serves as input to the processing 
steps in the center of the diagram, and the night side contains the data that is 
output from the processing steps. Each processing step is numbered; the number 
corresponds to the verbal description of the step in the extended description. 
Whereas the processing step in the diagram is in general terms, the corresponding 
text 1s a specific description that includes a cross-reference to the code for the 
processing. 
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Control Statement Execution , 
Diagram 1 


AMDPRDMP Diagram 4 Diagram 9 


Overview CVT, TITLE, GO, GRSTRACE or 


LPAMAP, ONGO, QCBTRACE 
NEWDUMP, 


NEWTAPE, and 
Diagram 2 Diagram 3 Diagram 4-13 SEGTAB Control 
Statements 







AMDPRDMP Control Statement Control 
Initialization Processing Statement 


Execution (see 
blow-up at Diagram 5 Diagram 10-11 


right) END Control] PRINT 
Statement Control] Statement 


Diagram 6 Diagram 12 


SUMMARY CPUDATA 
Control Statement Control Statement 





Diagram 7 Diagram 13 


FORMAT EDIT 
Control Statement Control Statement 


Diagram 8 


User Exit 
Processing 





Figure 3-1 (Part 1 of 2). Key to Method of Operation Diagrams for AMDPRDMP 
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Key to Method of Operation (MO) Diagram Symbols 


Entry into processing 1, 2, etc. Look for corresponding numbers in text 


A,B; ete, Look for blow-up of item on some poge 


Flow of Control 


Look for corresponding~lettered blow-up 
on some page 


Data Transfer 





Braces to denote related items 


See referenced diagrom for detatled 
description 
Reference to data 
MO1 Reference to another diagram 


Figure 3-1 (Part 2 of 2). Key to Method of Operation Diagrams for AMDPRDMP 


Pointer to or address of 
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PRDMP Diagram 1. AMDPRDMP Overview (Part 2 of 2) 
Input Process Output 


1 Initialize common communi- 
cation area. 
See MO2 for Details 





i] 


JCL Table of Contents 


a 
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a 
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oO 
0 
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SL 


2. Scan control statements. 


See MO3 for Details 


or LISYSIN PRINTER 


Control Statements Format Input Data 


3 Copy tape input to work file. 
4 Format the input data as specifiec | | 


in the control statements. 


Formatted 
Output Listing 


©o0o0c06UCUCOUUCOOUlUCOOlCUO 


| 


GTF (__- ==) 





SYSUT1 


5 Write the print dump abstract, 
the formatted data, and the 
table of contents in the output 
data set to be printed. 


SYSPRINT 


6 Write the messages in the output 
data set to be printed. 
See MOs 4-12 for Details RETURN 
Clear SYS1.DUMP Data Set 
7 Copy input data set. 


8 Clear SYS1.DUMP, if direct RETURN 
access. 


AMDSADMP 


: 


6oe0comUmwrelCwchbWClCcOULcOlUCO8UlUC 


(High-speed) 








See MO5 for Details 
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PRDMP Diagram 1. AMDPRDMP Overview (Part 2 of 2) 


Extended Description MO 


1 =‘ The user controls part of the operation of 2 
AMDPRDMP with JCL statements. AMDPRDMP 

initializes the common communication area with values 

from the PARM field in the EXEC statement. 


2 __=By using control statements, the user specifies the 3 
formatting to be performed by AMDPRDMP 

before the data is printed. The user enters the control 

statements into the system via either the input stream 

or the console. Depending on the function specified in 

the control statement, either EDIT modules, executor 

modules and their associated service modules, or user/ 

component modules are brought into storage to perform 

the functions requested via the control statements. 


3. ~=sCf the user’s JCL includes a SYSUT1 DD statement 
and if the input data set is on tape, AMDPR DMP 
copies the dump to the SYSUT1 data set. If SYSUT1 
cannot contain the entire dump data set, AMDPRDMP 
processes the input from both SYSUT1 and tape. If 
the input is a SYS1.DUMP data set, AMDPRDMP copies 
the contents of the direct access input data set to the 
SYSUT1 data set. 


4 = The input data to be formatted by AMDPRDMP 4-12 
is from the following sources: 


e The output data set from the generalized trace 
facility (GTF). 


e The output data set from the AMDSADMP service 
aid. 


e The SYS1.DUMP data set from the systern dump 
facility, a SYSMDUMP ABEND dump, or any dumps 
produced by SVC dump. (The input data for all of 
these dumps appears the same to AMDPR DMP.) 


The information from these sources is formatted accord- 
ing to specifications in the control statements. 


C 


Extended Description MO 


5,6 AMDPRDMP writes the title pages, the formatted 4-12 
data, and messages in output data sets that will 

be printed for the user. If the INDEX DD statement is 

included in the JCL, the print dump tabie of contents 

is written to the INDEX data set. 


7 s(f the user’s JCL includes a SYSUT2 DD statement, 5 
AMDPRDMP transfers the contents of the dump 

data set to the SYSUT2 data set for later processing. 

AJl format control statements are ignored at this time. 


8 AMDPRDMP clears the SYS1.DUMP data set so it 
can be reused. This processing occurs only if 
SYS1.DUMP is on direct access. 
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PRDMP Diagram 2. AMDPRDMP Initialization (Part 1 of 4) 


Input 


//Step 1 EXEC PGM = IKJEFTO1, 


il PARM = AMDPRDMP 





Register 1 


A PARM _ tft ] Analyze EXEC state- 
ment parameters.. — 


SWE Field of COM 


TITLESW = '1’ 


(Set During Step 1) 


Process 


2 Open output data sets. 


3 > «Initialize user exit parameter 
list address. 


wm 4 Obtain title. 





5 Determine source of contro! 
statements. 





LINECNT 





Output 


T 


Console 
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Common Communication Area 
(COMMON) 
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EDITER 
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PRDMP Diagram 2. AMDPRDMP Initialization (Part 2 of 4) 


Explanation 


4. The user may specify a list of parameters for 

AMDPRDMP with the operand PARM = 
‘AMDPRDMP,..,...’ in the EXEC statement. (A 
detailed discussion of the parameters and their meanings 
appears in Service Aids. ) 


AMDPRDMP analyzes the parameters and places their 
values in the common communication area (COMMON) 
as follows: 


e LINECNT — If LINECNT is specified, AMDPRDMP 
stores the number of Jines in the LINENUMB field 
if it is greater than 10 or less than 32K. 


e T —If the title option is specified, AMDPRDMP 
turns on bit 3 (TITLESW) of the SWE field. This 
bit is checked later (see step 4). 


e S— lf the stop option is specified, AMDPRDMP 
turns on bit 0 (STOPSW) of the SWE field, then 
issues Message AMD156| to the operator via a 
WTOR macro instruction. However, AMDPRDMP 
does not wait for a reply. At any time, the opera- 
tor may reply with a STOP, and processing of the 
current data set will cease. 


e ER — If an action is specified for an error during 
execution of the EDIT function (see MO 12), 
AMDPRDMP stores the value in the EDITER 
field. 


2 = «*iThere are three possible output data sets. 
PRINTER contains the formatted output 
information, SYSPRINT contains the messages, and 

INDEX contains the dump table of contents. 
AMDPRDMP stores the address of PRINTER DCB 
in the AOUTDCB field of COMMON, the address 

of SYSPRINT DCB in the APTRDCEB field, and the 
address of INDEX DCB in ANDXDCEB after it opens 
the data sets. 


3 .AMDOPRDMP puts the address of the ABDPL and 
the SRA in COMMON and initializes the parameter 
list for BLSQEXTI. 


Module 


AMDPRCTL 


AMDPRCTL 


AMDPRCTL 


AMDPRCTL 
AMDPRCOM 


AMDPRCOM 
AMDPRCTL 


AMDPRCOM 
AMDPRCOM 
AMDPRCOM 


AMDPRUIM 


Label 


BGNLOOP 


BEGLCNT 


BEGTITLE 


BEGINS 
STPWTORM 


BEGER 


AMDPRUIM 


C 


Explanation 


4 AMDPRDMP checks the TITLESW (bit 3) of SWE 
to determine whether the title option has been 
selected by the user, If so, AMDPRDMP issues message 


AMD154D to the operator via a WTOR macro instruction. 


The operator replies with the title. 


5 AMDPRDMP tries to open the reader DCB. If it 
opens, then there are control statements in the 
form of cards in the input stream. AMDPRDMP stores 
the address of the reader DCB in COMMON and turns 
on bit 7 (RDRSW) of SWA to indicate the presence of 
control cards. If the reader DCB does not open, the 
control statements must be obtained from the console. 


Module 


AMDPRCTL 
AMDPRCTL 


AMDPRCTL 


AMDPRCTL 


Cc 


Label 


WRTMSG 
DUMPMSG 


BEGING6GE 


BEGIN? 
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PRDMP Diagram 2. AMDPRDMP Initialization (Part 3 of 4) 


Input 


or 
/IANYNAME 


Input Dump Data Set 


Dump Header Record 


Process 


/[TTAPE 
G Copy contents of input data 
set and build storage map. 


— —————) 7 Initialize COMMON and 


print title pages. 


To Process 
Control 
Statements 





Output 


COD aisysurs 
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HISYSUT2 


Output Data Set 


COMMON 


REAL MAP 
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COMMON 
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PRDMP Diagram 2. AMDPRDMP Initialization (Part 4 of 4) 


Extended Description 


6 


If the input is from a tape or a direct access SYS!1.DUMP data set, 
AMLDPRDMP copies the input data set to the work-file data set and builds 
storage maps of the dump. If a work-file data set is not specified, 
AMDPRDMP builds the dump storage maps. 


If a SYSUT2 data set is specified, AMDPRDMP copies the input data set 
to the SYSUT2 data set without building any storage maps. 


AMDPRDM*P initializes the common communication area using values 
from the dump header record. 


AMDPRDMP writes the first title page to the print data set. 
AMDPRDMP invokes all header exits including the DAE header exit. 


AMDPRDMP formats the abstract title page and the console-initiated 
loop trace records. 


Module 


AMDPRLOD 


AMDPREAD 


AMDPRLOD 


AMDPRMST 


AMDPRCMC 


AMDPRMST 


AMDPRUIM 


AMDPRABS 
AMDPRLRF 


Label 
AMDPRLOD 
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PRDMP Diagram 3. Control Statement Processing (Part | of 4) 


From MOZ2 (for first statement) 


or MOs 4,6, 7,8,9, 10, 11, and 12 Process 


Input 


SWA of COMMON 


L=t_ ——p e@ SYSIN data set 


or 


yc 
[ 4-12 
CVT EDIT 
FORMAT 
LPAMAP 
PRINT 





NEWTAPE 
SEGTAB 


CPUDATA 
FITLE User-defined 


*Description of Path Descriptor 


Path Descriptor Element 


Module ID™ 


4 


Means 


Service module. 


Executor module {last element 
of path description). 
XXX XXxxX Reserved. 


Module ID: Last three characters of the module name. 





1 Obtain control statement from 


| 
| 
L — —gee Operator console. 
. 2 Scan control statement for verb. 
—_ we 
oo 





Output 


WTORMSG Buffer in COMMON 


Control Statement 


| common 
VERBGN If Delimiter Is [Code Is 
Syntax VERBEND 
Message DELIMCD - 3 
Routines 
COMOPPTR blank 12 
COMOPLN 





COMMON 


ASYNTAX | 


Input to Step 3 < Path Descriptor® 


(——» (See Diagram 7, 


Verb Exit ABDPL 


Processing for SRA 

the parameters 

of the user- 

defined verb.) ABDPLEXTN 
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PRDMP Diagram 3. Control Statement Processing (Part 2 of 4) 


Explanation Module 


1. AMDPRDMP checks the RDRSW bit to determine AMDPRCTL 
whether there are control statements in the SYSIN 

date set. If the bit is on, AMDPRDMP reads one control 

card. If an end-of-file condition exists, AMDPRDMP 

issues message AMD1 701 indicating end-of-file and sets 

RDRSW to 0. Then, or if the RDRSW bit is off, 

AMDPRDMP issues message AMD155D for the operator to 

enter a control statement. The control statements are 


stored one at a time in the WIORMSG buffer in COMMON. 


2 AMDPRDMP scans the WTORMSG buffer for the AMDPRCTL 
verb in the control statement. It saves the address 
of the beginning and end of the verb in the common area. 
It checks for the delimiter and stores a code indicating 
the delimiter in the DELIMCD field of COMMON. 
Finally, it compares the verb in the buffer to the valid 
verbs (listed above). If the verb is a user-defined verb, 
AMDPRDMP scans for parameters. If parameters exist, 
AMDPADMP moves them (including parameters con- 
tinued on subsequent input records) to a buffer and 
places the address of the buffer in COMOPPTR and the 
length of the parameters list in COMOPLN. If the verb 
is PRINT, AMDPRDMP scans the statement beyond the 
verb level to determine the parameters. If there are 
syntax errors in the control statement, AMDPRDMP 
writes a message in the SYSPRINT data set. However, 
for the user and other component defined verbs, 
AMOPRUIM scans the ECT {exit control table) to 
determine if the verb is a valid exit. If the verb is a 
user or Component exit, control is passed to the 
appropriate module. 


AMDPRCOM 


AMDPRUIM 


AMDPRUIM initializes the user exit interface. The 
ABDPL, its extension and the SRA are reinitialized 
for each exit invocation. A GETMAIN issued will 
obtain storage for an operands buffer. This buffer 
is addressed by the ASOPL extension in two ways. 
One manner acquires a direct pointer to operands. 


C 


Label 


TRDRSW 
RDCARD 
RDREOF 
WRTMSG1 


VERBSCN5 
VERBSCN3 
VERBSCN4 
EDIT 

OPERANDS 


PRINT 


SYNTAX/ 
SYNTAXA-E 
User or other 
component 
defined verb 
exit. 


Explanation Module Label 


The other uses a CPPL to obtain a standard TSO 
command buffer form. If the control statement was 
FORMAT, AMDPRUIM will translate it into a request 
for the SUMMARY verb exit with the FORMAT key- 
word. BLSQEXT| is called to load exit service routines 
and finish initialization of ABDPL and SRA. The Exit 
Services Router is called to invoke the ECT service, 
which will scan the ECT and link to the exit. (See 
[PCS Logic for a description of BLSQEXTI, the Exit 
Services Router, and the exit services.) (See Diagrams 
7 and 8), 
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PRDMP Diagram 3. Control Statement Processing (Part 4 of 4) 
Explanation Module 


3 The routines for executing function control AMDPRCTL 
statements are resident in virtual storage, and 
the function is executed without further processing. 


To execute format control statements, AMDPRDMP AMDPRCTL 

loads the appropriate path of service and/or executor 

modules shown in Figure 2 or EDIT modules shown in 

Figure 3. (The service modules perform functions that 

are common to several executor modules. The executor 

modules govern the execution of the functions specified 

in the control statement.} To load the path, AMDPRDMP 

uses the path descriptor for the modules. AMDPRDMP 

compares the path descriptor with a list of modules that 

have been loaded previously. Previous modules not AMDPRSEG 

required by this control statement are deleted, and the 

required modules are loaded. During the load, control 

is given to each service module to store entry points 

in COMMON. The last module in each path that is 

loaded is the executor module. 
AMDPRFUB 
AMDPRDPS 


Label 
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PRDMP Diagram 4. The CVT, TITLE, GO, ONGO, NEWDUMP, NEWTAPE, SEGTAB, and LPAMAP Control Statements (Part 1 of 4) 
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Control Statement TITLEMSG 
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Processing (step 3) 
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PRDMP Diagram 4. The CVT, TITLE, GO, ONGO, NEWDUMP, NEWTAPE, SEGTAB, and LPAMAP Control Statements (Part 2 of 4) 


Extended Description Module Label 


1 CVT —If the user believes that the communications 
vector table (CVT) pointer at storage location 

X‘4C’ has been destroyed, he supplies AMDPRDMP 

with the CVT address in the CVT control statement. 

AMDPRDMP finds the parameter via the address in the 


VERBEND field of COMMON, then checks the parameter AMDPRCTL CVTSET 


for syntax errors. Then AMDPRDMP determines what CVTSETA 
address is specified. If P is specified, AMDPRDMP CHECKCVT 
stores the address if the location at X’4C’ in the CVTOK 
CVTADDR field of COMMON. If a hexadecimal address CVTSET2 


is specified, AMDPRDMP converts the address to binary, 
then stores it in the CVTADDR field. Finally, it 
indicates that the CVT address has been stored by turning 
on bit 6 (SETCVTSW) in SWA. 


2 TITLE — The user may specify the title to be 

printed at the top of each page via the title con- 
trol statement. When a title control statement is 
encountered, AMDPRDMP locates the parameter via 
the address in the VERBEND field, then stores the 
title in the TITLEMSG field of COMMON. 


AMDPRCTL TITLEVRB 
TITLMOVE 


3 GO - By issuing the GO control statement the 
user causes AMDPRDMP to format the input data 
as if the user had specified the EDIT, SUMMARY, and 
PRINT CURRENT control statements. By using the 
ONGO control statement (see step 4), the user may 
change the group of pre-specified control statements 
to any combination of CVT, GRSTRACE, or QCBTRACE, 
LPAMAP, FORMAT, PRINT (with its parameters), 
SEGTAB, SUMMARY, CVTMAP, CPUDATA, SUMDUMP, 
SRMDATA, ASMDATA, LOGDATA, VTAMMAP, or 
EDIT. When AMDPRDMP encounters a GO control state- 
ment, the program uses the address in the ONGOPTR field 
of COMMON to obtain the parameter. The parameter will AMDPRCTL GO 
be the pre-specified default control statements or, if ONGO GOONGO 
was used, any control statements. AMDPRDMP stores the GO 
parameter in the WTORMSG buffer of COMMON, turns on VERBSCN5 
bit 4 (GOSW) in SWA, and passes the parameter to be 
scanned (see MO3) and executed as control statements. 


Extended Description Module Label 

4 ONGO -— By using the ONGO control statement, 
the user changes the group of control statements 

associated with GO (see step 3). When AMDPRDMP 

encounters an ONGO control statement, it locates ONGO!1 

the parameter via the address in the VERBEND field of ONGO2 

COMMON, stores the parameter, and places its address in GO 

the ONGOPTEB field of COMMON. When GO is used, 

AMDPRDMP will execute the new set of control 

statements. 


AMDPRCTL ONGO 


5 NEWDUMP — By using the NEWDUMP control 

statement, the user defines a new input dump data 
set for AMDPRDMP. Two keyword parameters may be 
specified: 

e IF DDNAME is specified, AMDPRDMP stores the 
DDNAME in the INDD field of COMMON, The 
DDNAME identifies the DD statement that 
describes the input dump data set. 


e If FILESEQ is specified, AMDPRDMP isolates the 
value, converts it to binary in WORK 1 buffer of 
COMMON, then stores it in the FI LESEQ field. 


AMDPRCTL NEWDD 


NEWFILE 


AMDPRCTL NEWTDUMP 
NEWRESET 


If neither keyword is specified, AMDPRDMP assumes 
that the new input dump data set is the same as for 
NEWTAPE (see step 6). When NEWDUMP is specified, 
AMDPRDMP resets switches associated with the former 
dump; it also resets the CVT and SEGTAB addresses 
and the address of the top of real storage. 
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PRDMP Diagram 4. The CVT, TITLE, GO, ONGO, NEWDUMP, NEWTAPE, SEGTAB, and LPAMAP Control Statements (Part 3 of 4) 
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Length of CSECT 


To Get 
Next 
Control 
Statement 


A cSECT 
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PRDMP Diagram 4. The CVT, TITLE, GO, ONGO, NEWDUMP, NEWTAPE, SEGTAB, and LPAMAP Control Statements (Part 4 of 4) 


Extended Description Module Label 


6 NEWTAPE — The NEWTAPE control statement is 
used in place of NEWDUMP to define new tape 
input. There are no keyword parameters associated with 

NEWTAPE, so AMDPRDMP assumes the TAPE DD 
statement, and FILESEQ=1. It stores the assumed 
values in the INDD, and FILESEQ fields of COMMON 
and resets switches from the former dump as it does NEWRESET 
for NEWDUMP (see step 5). 


AMDPRCTL NEWTDUMP 


7  SEGTAE -— If the user forgets to perform a store AMDPRCTL SEGTBSET 
status Operation prior to executing a stand-alone 

dump (AMDSADMP), the user supplies AMDPRDMP 

with the segment table address in the SEGTA6B control 

statement. AMDPRDMP locates the parameter via 

the address in the VERBEND field of COMMON, 

then stores the SEGTAB address in the SEGTABOR 

field. Finally, bit 1 (QSEGTBSW) of PRSW is set to 

indicate the segment table address has been stored 


8 LPAMAP — The LPAMAP control statement causes 

AMDPR DMP to format a list of the modules in the 
link pack area directory entries end the modules in the 
active link pack area queue. LPAMAP then causes 
AMDPRDMP to write the formatted information in the 
PRINTER output data set to be printed in two columns 
in the output listing. 


AMDPRDMP obtains information about the module 
names, the entry point addresses (EPAs) in the link 
pack area of the link pack directory entry (LPDE), 
and the EPAs of the contents directory entry (CDE). AMDPRLPA AMDPRLPA 
AMDPRDMP locates the address of the first LPDE 

in the CVT at CVTLPDIA and the address of the first 
CDE on the active queue in the CVT at CVTQLPAQ. 
If AMDPRDMP finds a minor entry, it obtains the 
length and the starting eddress of the module‘s 
CSECTs from the LPDE and the CDE. AMDPRDMP 
writes all of the information In the PRINTER data 
set to be printed on a separate page of the 
AMDPRDMP output listing. 
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PRDMP Diagram 5. The END Control Statement (art 1 of 2) 


Input FromMO3 Process 





SWD =0 


NOLOADSW ar —, i Ma y Transfer Input Data Set to SYSUT2 


ee ee 


[SvS0t2 = 








COMMON 
3 
COMMON 
Se 
6 
e 
6 
6 
6 
6 
Oo 


Register 13 


Save Area Address a KE) 5 


Determine type of data sets 
specified in JCL for input and 
SYSUT2. 


Open DCBs, then read input 
data set information and write 
information on SYSUT2. 


-» Terminate AMDPRDMP Processing 


Print execution statistics 
and dump index. 


Reinitialize: 


Close DCBs 


Reset SYS1.DUMP on D/A if 
SYSUTZ2 is specified 


Free buffers 

Restore GO values 

Restore line count value 
Zero page number 

Reset switches in COMMON 


Delete user interface modules. 


Return control to system. 


c 


Output 


RETURN to the 
Operating System 


COMMON 


ASYSUDCB 


Register 15 


Return Code =8 


6600000006 


//PRINTER 


LISYSPRINT 
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PRDMP Diagram 5. The END Control Statement (Part 2 of 2) 


Extended Description Module 


When the control statement is END, AMDPRDMP AMDPRCTL 
checks the NOLOADSW switch in COMMON to 
determine whether END is the only control state- 
ment for this execution of AMDPRDMP. If 
NOLOADSW is off, END is the only control 
statement for this execution, and the purpose 

of the execution is to transfer the contents of an 
input data set to the SYSUT2 data for later pro- 
cessing by AMDPRDMP. lf the data set is 
SYS1.DUMP on direct access, the data set is cleared 
to allow for more dumps. If NOLOADSW is on, there 
were other control statements in this execution of 
AMDPRDMP, and END terminates this execution. 


1. When END is used to transfer a data set, AMDPRRDC 
AMDPRDMP uses a DEVTYPE macro instruction 

to determine the type of input and SYSUT2 data set 

that are specified in the JCL. They may be either 


tape or direct access volumes. 


2 ~The work data set load module, AMDPRLOD is 
loaded to read the specified input data set and 
write the data in the SYSUT2 data set. When the 
transfer is complete, AMDPRLOD requests termination 
of AMDPRDMP by returning a code of 8 in register 15. 


AMDPRLOD 


3 = If the NOLOADSW switch in SWD is on, END is 
not the only control statement in this execution 
of AMDPRDMP: the purpose of END in this case is to 
terminate AMDPRDMP, AMDPRDMP uses the infor- 
mation stored in COMMON to write execution sta- 
tistics messages in the SYSPRINT data set. The 
statistics are not printed when END is used for a 
data set transfer. When the JCL does not include an 
INDEX DD statement, PRDMP prints the dump index 
at the end of the PRINTER data set. When the JCL 
includes an INDEX DD statement, the dump index 
is output to the INDEX data sat. 


AMDPRCTL 


Label 


END 


TSTDEV 


READNXT 


ENDSTATO 
-ENDSTAT?7 


Cc 


a 


Extended Description Module Label 


4 The END control statement terminates 
AMDPRDMP, both following a data set transfer 
and following other formatting operations. Termination 
processing includes: closing open DCBs and freeing 

associated buffer pools, freeing output and input 
buffers, restoring original GO values, freeing 

storage occupied by the ONGO buffer, restoring the 
default line count, zeroing the page number and 
resetting COMMON switches. AMDPRDMP deletes 
the AMDPRFMT and AMDPRECT modules. 


AMDPRCTL ENLOOP2 


AMDPRUIM AMDUSRDL 


AMDPRDMP calls PLSQEXT1 to delete the exit services it 

loaded in, since they are not required for the control 

statement execution. (Refer to Diagram 3, Step 3 and 

the explanation listed in the Control Statement Process- 

ing under Part 3). 

5 Finally, AMDPRDMP locates the highest level AMDPRCTL ENDALL 
Save area address and returns control to the 

operating system. 
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PRDMP Diagram 7. Verb Exit Processing Table (Part 1 of 1) 
Note: All input is via Register 1, which contains the address of the verb exit parameter list, BLSABDPL. Specific modules utilize 
PRDMP service routines and are responsible for the processing of the control blocks to produce a printed dump data set. 


Verb exits are control statements that represent program modules. They are defined in the exit control table (ECT). AMDPRDMP checks 
the ECT and passes control to these modules when the corresponding control statement is specified. 


Tapa Module 


The ASMDATA control statement causes AMDPRDMP to format and print the 
contents of the auxiliary storage manager control blocks from the input data set. For a 


ASMDATA ILRFTMAN 
list of the control blocks printed, see MVS/XA Service Aids. For a description of 
ILRFTMAN, see MVS/XA System Logic Library. 


CVTMAP The CVTMAP control statement causes AMDPRDMP to format the communications AMDPRCVT 
vector table and write the formatted information in the PRINTER data set for printing. 

DAEDATA The DAEDATA control statement causes AMDPRDMP to invoke ADYHDFMT, the ADYHDFMT 

DAE format routine. ADYHDFMT formats and prints information from the dump 


header record. For a description of ADYHDFMT output, see the MVS/XA Debugging 
Handbook. 


The FORMAT control statement causes PRDMP, via AMDPRUIM and BLSQSUM1, to 
format and print the major system control blocks associated with each address space. 
AMDPRUIM transposes the FORMAT control statement into SUMMARY FORMAT 
and invokes the exit services router to process the SUMMARY verb exit. For a 
description of BLSQSUM1, see MVS/XA IPCS Logic. 


The GRSTRACE, Q, or QCBTRACE control statement causes PRDMP to format and 
print the global or local resource queues in the input data set. For a description of the 
control blocks printed, see MVS/XA SPL: Service Aids. For a description of 
IOSGDPDMP, see Global Resource Serialization Logic. 


The IOSDATA control statement causes AMDPRDMP to format and print the contents 
of specific I/O supervisor (IOS) control blocks from the input data set. For a list of the 
control blocks printed, see MVS/XA SPL: Service Aids. For a description of 
IOSVFMTH, see MVS/XA System Logic Library, Volume 6, Part 2. 


JES3 The JES3 control statement causes AMDPRDMP to format contents of specific control JATABPR 
blocks within the JES3 address space. 


LOGDATA The LOGDATA control statement causes AMDPRDMP to invoke IFCERFMT via the IFCERFMT 
user exit interface. IFCERFMT formats and prints the records in the in-storage 
LOGREC buffer at the time of the dump. 


MTRACE The MTRACE control statement causes AMDPRDMP to format and print the contents 
of the master trace table for the dumped system in a first-in, first-out order. MVS/XA 
Diagnostic Techniques describes this table. MVS/XA System Logic Library, Volume 6, Part 
2 describes JEEMB817. 


The NUCMAP control statement causes AMDPRDMP to format and print the contents 





FORMAT AMDPRUIM 


GRSTRACE ISGDPDMP 


IOSDATA IOSVFMT 





JEEMB817 





NUCMAP IEAVNUCM 


of the nucleus map entries in the dump data set. See MVS/XA SPL: Service Aids for 
more information. 


RSMDATA The RSMDATA control statement causes AMDPRDMP to format and print the 
contents of the real storage manager control blocks from the input data set. For a list of 


the control blocks printed, see MVS/XA SPL- Service Aids. 


SADMPMSG | The SADMPMSG contro] statement causes AMDPRDMP to format and print the AMDSAFCM 
stand-alone dump console message log. See MVS/XA SPL: Service Aids. 
SRMDATA The SRMDATA control statement causes AMDPRDMP to format and print the OUCBs IRARMFMT 


(system resource manager user contro] block) on the WAIT, OUT, and IN queues and 
the DMDT (domain descriptor table). 


IARRDMP 
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Licensed Materials — Property of IBM 
The SUMDUMP contro] statement causes AMDPRDMP to pass control to the summary 
dump format routine (IEAVTFSD) via the user exit interface. IEAVTFSD is described 
with the summary dump function of SVC dump under the recovery termination 


SUMDUMP IEAVTFSD 
management (RTM) component in the MVS/XA System Logic Library, Volume 6, Part 2. 

SUMMARY The SUMMARY control] statement causes PRDMP to format and print a job summary, BLSQSUM! 
a TCB summary and/or major system contro] blocks in full or key-field form. PRDMP 
accesses BLSQSUM!1 to complete the task. For a description of BLSQSUM], see 
MVS/XA IPCS Logic. 


TCAMMAP The TCAMMAP control statement causes AMDPRDMP to print ACF/TCAM control JTEDPRDMP 
blocks that are helpful in ACF/TCAM problem determination. AMDPRDMP locates 
TRACE IEAVETFC 


and formats selected ACF/TCAM control blocks in dumps produced by the 

AMDSADMP and SVC dump programs. For a description of the ACF/TCAM 
VSMDATA IGVSFMAN 
VTAMMAP ISTRAFD1 




























formatted dump routine and the control blocks selected, see ACF/TCAM Diagnosis 
Guide. 


The TRACE control statement causes AMDPRDMFP to pass control to the system trace 
formatter controller routine (IEAVETFC) to format and print the system trace table. For 
a description of the system trace table, see MVS/XA Diagnostic Techniques. For a 

description of the TRACE control statement, see MVS/XA SPL: Service Aids. 


The VSMDATA control statement causes AMDPRDMP to format and print the contents 
of the virtual storage manager control blocks from the input data set. These control 
blocks are described in MVS/XA SPL: Service Aids. For a description of IGVSFMAN, 
see MVS/XA System Logic Library, Volume 6, Part 2. 


The VTAMMAP control statement causes AMDPRDMP to print ACF/VTAM control 
blocks that are helpful in ACF/VTAM problem determination. AMDPRDMP locates 
and formats selected ACF/VTAM control blocks in dumps produced by the 
AMDSADMP and SVC dump programs. For a description of the ACF/VTAM 
formatted dump routine and the control blocks selected, see ACF/VTAM Diagnosis 
Guide, 
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PRDMP Diagram 9. The PRINT STORAGE/REAL/NUCLEUS/SQA/CSA Control Statements (Part 1 of 2) 
Input From MO3_ Process Output 






PRINT CONTROL STATEMENT 


PRINT STORAGE /PRINT REAL/ 
PRINT NUCLEUS/PRINT CSA/PRINT SQA 


PRINT STORAGE 
Control Statement Values 











Beginning Tt, End ft 
= One tT. 


STORAGE = ASID, 
/ fj 


| No Addresses 


// PRINTER 





1 Build and enqueue PCBs to 
print requested storage or pages: 









2 e PRINT STORAGE — Print 
virtual storage range for job 
as indicated by control state- 
ment. If no address space 
is specified AMDPRDMP 
will attempt to process the 
four cross memory address 
spaces. if the cross memory 
address spaces are not in the 
dump data set, or if 
AMDPRDMP cannot identify 
them, the address space active 
on the processor on which 
the dump was taken will be 

processed. 


PRINT REAL — Print real 
storage range as indicated. 
PRINT NUCLEUS — Print 
DAT-on and DAT-off nucleus. 


PRINT CSA — Print common 
service area. 


PRINT SQA — Print system 
queue area. 






Virtual 










High t = 
X'7FFFFFFF’ End ft 


ASID 
PRINT REAL 


Storage 
Control Statement Values 


~ . = 
AsID D 
No Address 


= Beginning t, End ft 
= One tT. 














PCB Real 
Storage 


PCB ° 
















PCBPL. 


or Beginning fT 
High t = 

REALMAX 

PRINT NUCLEUS 


High f = 
End Tt 
ECT 
Module ENUC Virtual 
Name PCBPL PCB Storage 


COMMON 
P| High t= [2 
NUCTOP NUCTOP 




































PRINT REAL/STORAGE — 
Print registers and current 


To Get Next 
Contro! Statement 














PRINT SQA Virtual PSW of IPL’ed CPU. 
AQAT PCBPL Storage 
=" 
Lowt Size 
PRINT CSA Virtual 





PCBPL PCB Storage 


RD 
(] fle taseroresa} J 4 





c 


WA Jo Apiedoig — seuiajeya, posuaory 


GT JO S[RM9}BJAl P2zIysSay SULe}UO") 


S861 7861 “I0D Wa] 1q3uAdOD © 7-681 I-8Z7AT 


((NdUYdGWy) dung wug ‘¢ 1aideqn 


LCe-t 


c 


C 


PRDMP Diagram 9. The PRINT STORAGE/REAL/NUCLEUS/SQA/CSA Control Statements (Part 2 of 2) 


Extended Description 


The PRINT control statement, along with its param- 
eters, causes AMDPRDMP to format and print areas 
of real or virtual storage. During initialization, 
AMDPRDMP stores information describing the 
storage map used during PRINT execution in the 
print dump common communication area 
(COMMON). 


1. When AMDPRDMP encounters a PRINT control 

statement with any of the parameters listed below, 
it sets up a parameter list (PCBPL) describing the 
storage to be printed. 


2 e STORAGE -— If the user supplied AS! D(s), 
AMDPRDMP places the value in PCBPL. If 
no address space is specified AMDPR DMP 
attempts to process the four cross memory 
address spaces (home, primary, secondary, 
cross memory lock). If any of the address 
spaces have the same ASID as another, the 
address space will only be processed once. 
If AMDPRDMP is unable to determine 
the cross memory address spaces, or if they 
are not in the input data set, the default 
is the ASID of the job active on the CPU 
from which the dump was taken (from 
QASID in COMMON). The range of the ad- 
dress space to be printed is determined from the 
control statement. If only one address is 
specified, that address is used as the low 
address and the highest virtual storage 
address as the high address. If no address is 
specified, AMDPRDMP prints the entire 
address space. The printed output appears as 
follows: 


@ Nonextended and extended private storage 
areas for each specified ASID in the dump 


@ Nonextended COMMON 
@ PSA (0-4K) and the entire DAT-on nucleus 
@ Extended COMMON. 


Module 


AMDPRPMS 


Label 


Extended Description 
e REAL —AMDPRDMP sets up PCBPL with an 
address range for real storage. The high and 


low addresses are determined as for STORAGE. 


e NUCLEUS — AMDPRDMP sets up a PCBPL 


for the DAT-on nucleus. If the DAT-off nucleus 


is contained in the dump, AMDPRDMP sets up 
a PCBPL for it. An SVC dump may not con- 
tain the DAT-off nucleus. 


@ CSA — Using the address ranges taken from 
the GDA during print dump initialization, 
AMDPRDMP sets up a PCBPL for both the 
nonextended and extended CSA. 


@ SQA — Using the address ranges taken from the 
AQAT index tables and the AQAT tables for 
each system queue area subpool, AMDPRDMP 
sets up a PCBPL for both the nonextended and 
extended SQA. If the address ranges are not 
available, AMDPRDMP sets up a PCBPL using 
the address ranges from the GDA. 


3 For the STORAGE or REAL parameter (with no 

subparameters), AMDPRDMP writes the contents 
of the 16 general purpose registers, 16 control registers, 
4 floating point registers, the prefix register, and the 
current PSW from the CPU on which the dump was 
taken. {f input is from AMDSADMP, this information 
is taken from the CPUSTATUS record. Otherwise, it is 
from the dump header record. 


Module Label 


AMDPRPMS 


AMDPRNUC 


AMDPRNUC 


AMDPRNUC 


AMDPRDPS 
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PRDMP Diagram 10. The PRINT CURRENT/JOBNAME Control Statements (Part 1 of 4) 


From 
Input MO3 Process 


PRINT CURRENT 
COMMON 


CURASCB 
1 Obtain ASCB addresses: 


SVCDUMP or SYSMDUMP, 
AMDPRDMP obtains the 
cross memory address spaces 
from COMMON. For 
SADMP, AMDPRDMP obtains 


PRINT JOBNAME 


Control Statement 


JOBNAME = (name 1, name 2, . . .) the cross memory address 


spaces for each online pro- 
cessor using the CPU status 
record, ASVT, and PSA. If 
any of the four cross memory 
address spaces (home, primary, 


secondary, or cross memory 
lock) for a given processor 
have the same ASID, that 
address space is only pro- 
cessed once. If AMDPROMP 
cannot determine the ASID 
of the cross memory address 
spaces or if they are not in 
the dump data set, the ASCB 
of the address space that was 
current when the dump was 
taken is used. 


PRINT JOBNAME — Obtain 
addresses of ASCBs associ- 
ated with jobnames specified 
in the control statement. 


> MO11 
Part 3 
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PRDMP Diagram 10. The PRINT CURRENT/JOBNAME Control Statements (Part 2 of 4) 


Extended Dascription Module Label 


1. When AMDPRDMP encounters a PRINT control 

statement with the CURRENT or JOBNAME 
parameters, it gets the ASCB(s) associated with the 
parameter. 


If the exit control table (ECT) indicates the jobname/ AMDPRUIM AMDUSRXT 
current exit is in effect, AMDPRDMP passes control 
to the user-exit module before beginning its processing. 


e CURRENT — AMDPRDMP formats and prints the AMDPRPCR 
cross memory address spaces (home, primary, 
secondary, and cross memory lock). For SADMP 
cross memory address spaces, AMDPRDMP formats 
and prints ASCBs for each outline processor. For 
SVCDUMP or SYSMDUMP cross memory address 
spaces, if the cross memory address spaces cannot 
be determined, AMDPRDMP gets the address of 
the current ASCB and the current ASID from the 
CURASCB and OASID fields in COMMON respec- 
tively. If either value is zero, AMDPRDMP cannot 
print CURRENT data and issues a message to that 
effect. 


Note that if the ASID of any of the four possible 
address spaces is the same, that address space is only 
printed once and a message is issued to that effect. 


e JOBNAME — AMDPRDMP builds a list of job- AMDPRPJB 
names specified in the control statement. It 
compares the jobname specified in each ASCB 
with the names in the list. Whenever an ASCB 
is found with a specified jobname, a switch is 
set in the jobname list indicating the name has 
occurred. 
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PRDMP Diagram 10. The PRINT CURRENT/JOBNAME Control Statements (Part 3 of 4) 


From 
Input MO11 Process Output 


Part 1 
PRINT CURRENT/JJOBNAME 
FBQE 


ASCB LDA 






PRINT CURRENT/JOBNAME 
kFree Area 


2 Build PCBs for region bounda- 
ries of ASCB and enqueue PCBs 
to print regions. 


PRINT CURRENT/JOBNAME 






3 Format and print contro! blocks 
for each ASCB by invoking 
SUMMARY FORMAT verb BLSQSUM1 

PRINT CURRENT/JOBNAME ASCB ASXB exit. 


// PRINTER 


i» 
be) 
6 
6 


te 
0 
o 
te 
°o 








TCB 











4 TIOT 


yoo 
1 xse 


Information from the LT, AT, ET | 4 1HSA 
Status of ASTEICMA Status of ASTESSEM 


PRINT CURRENT SWD in COMMON 


= 1 —_—_—e — 
GPRSFND PRINT CURRENT/JOBNAME 


16 General Prefix Register 
Purpose Registers 16 Control Registers 
Current PSW 4 Floating Point Registers 


PRINT CURRENT 





SRB 
4 Print registers and current PSW. 





SRB 


Dump Header 









BH Print storage associated with 
ASID. 


Mo3> To Get Next 


Control Statement 
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PRDMP Diagram 10. The PRINT CURRENT/JOBNAME Control Statements (Part 4 of 4) 


Extended Description 


2 AMDPRDMP uses the region descriptor to deter- 
mine the beginning and ending addresses of the 
private area. Then it determines the unallocated 
space from the FBQEs for the ASCB. AMDPRDMP 
calculates addresses for space allocated to the region. 
Then using the addresses in the parameter list, 
AMDPRDMP builds a PCB to contain the addresses. 
It enqueues the PCB in its proper sequence in the PCB 
queue, then reads and formats the storage areas speci- 
fied in the PCBs. As the storage is written in the 
PRINTER data set, AMDPRDOMP dequeues the PCBs. 


3 PROMP invokes the SUMMARY verb exit with 
the FORMAT keyword for each ASID selected in 


Step 1. SUMMARY formats the ASCB and each TCB. 


e RBs pointed to by the TCB. 


e Extended status blocks (XSBs) pointed to by 
each active request block (RB). 


@ Queue of PCLINK stack elements (STKEs) 
associated with each XSB. 


@ Load list. 

@ Job pack queue area. 

e DEBs associated with the TCB. 

e@e Task input/output table (TIOT) for the TCB. 


@e Data management control blocks for the TCB 
(DCB and |OB/ICB/LCB). 


e |OS control blocks for the TCB (XDBA 
(EXCPD) and UCB). 


@ RTM control blocks for the TCB (RTCT, 
RTM2WA, EED, SCB, FRRS, and IHSA). 


e XSBs and STKEs pointed to by the IHSA. 


Module 


AMDPRDPS 


AMDPRDPS 


AMDPRDPS 
AMDPRDPS 


AMDPRUIM 
BLSQSUM1 


IECDAFMT 


IECIOFMT 


IEAVTFMT 


IEAVTFMT 


Label 


PCBRIN 


PCBENQ1 


PRNTSTG 


AMDUSRXT 


Extended Description Module Label 


4 Forthe CURRENT parameter, AMDPRDMP AMDPRDPS- PRITSTGO 
writes the contents of the prefix register, the 16 
general purpose registers, 16 control registers, the 4 
floating point registers and the current PSW (if available) 
in the PRINTER data set. AMDPRDMP checks the 
GPRSFND bit in SWD of COMMON to determine 
whether it should write the registers. AMDPRDMP 
will obtain the current ASCB and ASID. The CVTTCBP 
points to a four word table. The fourth word of that 
table points to the current ASCB. If the current ASCB 
cannot be determined, the following comment is 


written: 


AMDPRPCR 


"UNABLE TO ACCESS CURRENT TASK’ 


Fora SADMP, AMDPRDMP determines if the current 
address space is the dummy wait task. 


The address space is the dummy wait task when the 
PSAAOLD field in PSA points to the master scheduler’s 
address space and the PSAANEW field points to WAIT‘s 
address space. The WAIT task has an ASID of Zero. If 
the current ASCB is the dummy wait the following 
comment is printed: 


‘CURRENT TASK is DUMMY WAIT TASK’ 


fF AMDPROMP prints the storage associated with AMDPRDPS AMDPRDPS 


the requested address spaces, and fills in PCBPL. 


6 AMDPRDMP prints the TCB summary collected 
during formatting of control blocks. 


AMDPRFSC 


C 
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PRDMP Diagram 11. The CPUDATA Control Statement (Part 1 of 2) 


Input Process 


C CSD 


VT 
CVTCSD . ($< =< $=- ] Format and print common 
SA 


system data. 
P SVT 


PSASVT SE ee 2 Format and print supervisor 


vector table. 





CVT LCCAVT 


For Each CPU 


3 Format and print logical con- 
figuration communications 
area, 






Format and print physical 
configuration Communications 
area. 





Dump Header/CPUSTATUS 


16 General Purpose Registers 
16 Control Registers 
4 Floating Point Reqisters 
Prefix Negister 
Current PSW 
CPU Timer 
Clock Comparator 








B Print current PSW and all 
registers for CPU, if input is 
from stand-alone dump. 


G6 Format and print prefixed 
storage area. 





7 Print a message indicating the 
ASID of the cross memory 
address spaces. 























Physical 
CPU 


Address 
Table 


Output 


° 
Qo 
: 
3 
3 


// PRINTER 
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PRDMP Diagram 11. The CPUDATA Control Statement (Part 2 of 2) 
Extended Description Module Label 


The CPUDATA control statement causes AMDPRDMP 
to format and print processor-related information. 


AMDPRGCD invokes AMDPRUIM to initialize the 
exit interface and then uses the Control Block For- 
matter exit service to format contro} blocks. 


1. AMDPRDMP uses the CVT pointer to locate, 
format, and print the common system data area 
(CSA). 


AMDPRGCD 


2 AMDPRDMP uses the PSA pointer (PSASVT) to 
locate and print the supervisor vector table (SVT). 


AMDPRGCD 


3 AMDPRDMP uses the CVT pointer to locate, 

format, and print the logical configuration com- 
munications area (LCCA) for a processor. If the LCCA 
vector table pointers are invalid, the prefixed storage 
area (PSA) pointer to the LCCA is used. 


AMDPRGCD 


4 AMDPRDMP uses the CVT pointer to locate, 

format, and print the physical configuration 
communications area (PCCA) for a processor. If 
the PCCA vector table pointers are invalid, the pro- 
gram uses the pointer in the PSA to get the PCCA. 
Output comments are issued if pointers are invalid 
or if the control block cannot be found. 


AMDPRGCD 


5 sf the input data set is from AMDSADMP, the AMDPRDPS 
PSW and all registers for the processor are 
obtained from the CPUSTATUS record. Otherwise, 
AMDPRDMP gets this information from the dump 
header record. In either case, AMDPRDMP prints 
the current PSW and all registers for the processor. 

A table of processor addresses is kept to avoid 
duplication of processing. An output comment is 
issued if the data cannot be printed. 


AMDPRGCD 


G6 AMDPRDMP formats and prints the prefixed 

save area (PSA) for the processor and the current 
PCLINK stack elernent (STKE) queue pointed to by 
the PSA. 


AMDPRDPS 


Cc 


Extended Description Module Label 


J AMDPRDMP prints a one line message that AMDPRGCD 
indicates the ASID of the cross memory address 
spaces (home, primary, secondary, and cross memory 


lock) held. 
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PRDMP Diagram 12. The EDIT Control Statement (Part 1 of 10) 


From 
MO3 
Process 


EDIT... a os Obpin EDIT parameters 
| 


AMDPRTAB 


of! 


Oldest Time Stamp 
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COMMON 
eee MCHEAD __ 
cvTappR| |_| 
SCS 
Trace Buffers 
CVT GTFPCT 
Be Be 
CVTGTFA HQ HEAD 
__s—ses_ TT 
SLO HEAD 


C 





| fsuie_ [RR SRM_ 
| [exit Tasca Tri 
| LDDNAME | SYS_| EXT_| 
h——w{stanT [io [sr _ 

[sosname | svc | NiO” 


2 Obtain GTF record from 


@® external data set not on 
direct access device 
or 


® external data set on direct 
access device 
or 
@ dump data set. 
AMDPRTAB 
CURREC 


Output 


COMMON 
AEDITCB 


AMDPRTAB 


USEREXIT |DDNAME | STARTIME 
STOPTIME ASCBADDR 
SIOFLGS |OFLGS2 
ODVADS SVCNUMS 
USRFLGS PIFLGS 


PICODES GENFLAGS 


Message AMD211I 
EDIT OPTIONS IN... [7> 


INRFCFGS 


EXTTRC 











GTF Record 
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PRDMP Diagram 12. The EDIT Control Statement (Part 2 of 10) 


Extended Description Module Label 


1 When AMDPRDMP encounters an EDIT control AMPRCTL 
statement, it initializes the EDIT communications 

table (AMDPRTAB) pointed to by the AEDITCB field 

of COMMON with the EDIT parameter values derived AMDPROOT 

from the EDIT control statement. It resolves mutually AMDPRSCN 

exclusive parameter conflicts and sorts selected SSCH, 

lO, and USR values in ascending order. Then it issues 

a summary message (AMD2111) to inform the user of 

the EDIT options in effect. See Service Aids for a 

description of the EDIT parameters. 


2 __=siInorder to obtain a GTF record for the first time, AMDPRGET 
AMDPRDMP determines the source of the input 
data, either an external data set or a dump data set. 


e Ifa DDNAME is specified in the DDNAME field of 
AMDPRTAB, AMDPRDMP assumes that the asso- 
ciated DD statement in the AMDPRDMP JCL 
describes an external GTF data set. It sets on the 
EXTTRC flag in INRFCFGS field of AMDPRTAB, 
then checks the device to determine whether the 
external data set is on a direct access device. If not, 
it obtains the first record in the data set. 


e If the data set resides on a direct access device, 
AMDPRDMP positions to the record with the 
oldest timestamp. (If no timestamp is available, 
AMDPRDMP processes the data set as if it were not 
on a direct access device.) 


C~ 


Extended Description Module Label 


If the GTF buffers are in a dump data set, 
AMDPRDMP obtains the address of the CVT in the 
dump from CVTADDR in COMMON. From the CVT, 
AMDPRDMP locates MCHEAD, the control table 

of the monitor call (MC) routing facility. From 
MCHEAD, AMDPRDMP locates the MC control 
element (MCCE) which in turn points to a chain of 
MC queue elements (MCQEs). AMDPRDMP scans 

the chain for the GTF application MCQE. The 

MCQE contains the address of the GTF control 

table, GTFPCT. If the dump is from AMDSADMP, 
AMDPRDMP uses the GTFPCT pointer (HQHEAD) 

to the most recent GTF buffers. AMDPRDMP also 
formats the GTFBLOKs in order from oldest to 
newest. If the dump is from SVC Dump, AMDPRDMP 
uses the GTFPCT pointer to the save queue (SLO 
HEAD). The save list element chain is scanned for 
ASID of the dump. The buffers required are then 
located. (In either case, the queue pointer is to a 
buffer contro! block which points to the buffer.) 


AMDPRDMMP stores the address of the record in the 
CURREC field of AMDPRTAB. (For a description 
of GTF output records, see the ‘Data Areas” section.) 
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PRDMP Diagram 12. The EDIT Control Statement (Part 3 of 10) 


From MO13 
Part 1 


Input Process Output 









Time Stamp Record 
AID FID 
X‘'00° x’01' 
Lost Event Record 
AID FID 
X ‘OQ’ X‘02’ 


Lost Block Record 


AID FID 
X ‘GO’ x’03' 
-——— 


AMDPRTAB | 


USEREXIT me ——— —|— ® print the contents of the 


output area. 





3 Format all lost event and lost 
block records and associated 
timestamp records. 






//PRINTER 





0 
0 
0 
6 
0 
0 
0 
0 
0 


=Nonblank 









—g» 4 Pass trace record to user exit 
routine to: 








Parameter List 








or 

@ bypass the record. paar 
Output Buffer & es AMDPRTAB 
GTF Opti : 
@ eliminate the user exit routine. USEREXIT=Blank 
of 
[Data 

‘ format the record regardless INRFCFGS Field of 






of EDIT option selectivity. AMDPRTAB 
or DMDFMT=1 
e format record according to GENFLAGS 


EDIT options selected. 


MO12 
a Part 5 
@ terminate EDIT execution. 


INRFCFGS Field of AMDPRTAB 


FMT=1 
moa) To Get Next Control Statement 
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PRDMP Diagram 12. The EDIT Control Statement (Part 4 of 10) 


Extended Description 


3 sf the record has an AID of X'00’, it is a contro! 

record (timestamp, lost block, or lost data). 
AMDPRDMP initializes the output buffers using the 
FMTPTRN macro instruction and converts the 
record to the output format. The formatted records 
are written in the PRINTER output data set for later 
printing in the AMDPRDMP output listing. 


4 If the USEREXIT fietd of AMDPRTAS is non- 
blank, AMDPRDMP passes the record to the user 

exit module via a 5-word parameter list containing the 

address of a copy of the input record, the address of 


the output buffer, the address of the GTF option word, 


and the addresses of the EID and data fields in the 
record. On the return, the user exit routine instructs 
AMDPRDMP to do one of the following: 


@ Print the output buffer. 
@ Bypass the record and get the next one. 


e Eliminate the user exit (set the USEREXIT field 
to blanks). 


e Format the record regardless of the EDIT options 
in effect (set the SYSM and SYS bits on in 
GENFLAGS). 


@ Format the record according to the EDIT options 
in effect. 


@ Terminate a EDIT processing. 


Module Label 


AMDPRREC 


AMDPRCOM 


AMDPRFLT 
AMDPREXT 
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PRDMP Diagram 12. The EDIT Control Statement (Part 5 of 10) 









From MO13 
Part 3 
Input Process Output 
User Records . f 
Record USRFLGS in AMDPRTAB 5 Filter record to appropriate 0 0 
EID = Exxx]] FID =nn [| ALLU = 1 pOnmataieeenoauess § //PRINTER 8 
USRNGTAB @e |MDUSRnn — user/component IMDUSRXX 8 8 
EID Range SELU = 1 format appendage : 0 
a) 
Record 9 2 
EID = Exxx[] FID =00 jf @ AMDPRHEX — hexadecimal e 3 
System Records dump routine ° ° 
Record 2 
| Y) 6FID=03) 2 [| [OY e AMDSYSO3 — SYSM record 8 
Record Record format appendage 
[[Jobname h}—-  -—|[el Asce §] 
I 

JOBNAMES ‘- m| ASCBADDR 

Eas) i b Sa 

=o Le ascep § 

ee — 





GENFLAGS 
and| ss SYS=1 SO —S @ One of the following system O73 
format appendages: 
Ly @ AMDSYSOO — SSCH, IO 

format appendage 

Record SIOFLGS/IOFLGS2 

| |  FlID=00 | jand{[ALL=1orSEL=1 aaa a e AMDSYSO01 — SVC format 

Record SVCFLGS appendage 

and[ALLV = 1 or SELV=1 


e@ AMDSYSO2 — DSP, Pl 
format appendage 
FID = 02 and 
a a e AMDSYS04 — SRM, RR, RNIO, 


Record GENFLAGS 
PIFLGS 
ALLP = 1 or SELP = 1 


Scand GENFLAGS e AMDSYSO5 — EXT format 
. SRM =1, RNIO=1,RR=1 
| | FID =04 | | and appendage 


SLIP format appendage 





or SLIP = 1 
Record GENFLAGS e AMDSYSO6 — RNIO (pro- 
and [EXT = 1 duced under ACF/VTAM 
aa =06 and GENEEAGS Version 2) format 
Record SIOFLGS/IOFLGS2 appendage 
| | FID=07 ~~ | | and|CCWS =1 or CCWI =1 @ AMDSYSO7 — CCW format 
. appendage 


U C c 
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PRDMP Diagram 12. The EDIT Control Statement (Part 6 of 10) 


Extended Description Module 


5 If the user exit specifies that the record should be AMDPRFLT 
formatted, or if no user exit is included, AMDPRDMP 
performs a variety of tests to filter the record to the 


appropriate format appendages: 


e If the first character of the EID is E, the record is a 
user record. If the ALLU flag is on, or if the SELU 
flag is on and the EID in the record is included in 
the EID ranges specified in the USRNGTAB of 
AMDPRTAB, AMDPRDMP passes control to the 
user format appendage IMDUSRxx where xx is 
the FID in the record. 


AMDPRAPP 


e If the FID in a user record is 00, the user wants the AMDPRREC 
record to be dumped in hexadecimal, so AMDPRDMP 
Passes the record to the hexadecimal dump routine, 


AMDPRHEX, located in AMDPRDMP. 


e If the FID of the record is 03, the record is aSYSM 
record. AMDPRDMP then uses the option bits in 
AMDPRTAB and the EID to determine whether the 
record is to be formatted. If so, AMDPRDMP passes 
control to the minimal record format appendage. 


e If the record is not user or SYSM, AMDPRDMP 
interrogates the JOBNAMES field in AMDPRTAB. 
If jobnames have been specified, AMDPR DMP 
verifies that the jobname in the record matches 
one of the selected jobnames. If not, it performs 
a similar check for ASCBADDR and the ASCB 
address in the record. If no match at all occurs, 
the record is bypassed. If a match occurs, or if 
neither jobnames nor ASCB addresses were specified, 
AMDPRDMWP filters the record to the proper system 
format appendage. 


e If the SYS bit is on in the GENFLAGS field, 
AMDPRDMP passes control to AMDSYSxx where 
xx is the FID. 


AMDPRAPP 


AMDPRFLT 


AMDPRAPP 


C 


Extended Description Module Label 


If the SYS bit is off and the FID is 00, AMDPRDMP AMDPRAPP 
verifies that at least one bit is set on in the SIOFLGS 

or IOFLGS2 field, then passes control to the SSCH, 

lO comprehensive record format appendage. 


If the SYS bit is off and the FID is 01, AMDPRDMP 
verifies that at least one bit is on the SVCFLGS 
field, then passes control to the SVC comprehensive 
record format appendage. 


If the SYS bit is off and the FID is O02, AMDPRDMP AMDPRAPP 
verifies that either the DSP flag in GENFLAGS is on 

or that one of the bits in the PIFLGS field is on, then 

passes control to the P|, DSP comprehensive record 

format appendage. 


If the SYS bit is off and the FID is 04, AMDPRDMP AMDPRAPP 
verifies that either the SRM, RNIO, RR, or SLIP flag 

in GENFLAGS is on, then passes control to the SRM, 

RNIO, RR, SLIP comprehensive record format 

appendage. 


If the SYS bit is off and the FID is 05, AMDPRDMP AMDPRAPP 
verifies that the EXT flag in GENF LAGS in on, then 

passes control to the EXT comprehensive record 

format appendage. 


If-the SYS bit is off and the FID is 06, AMDPRDMP 
verifies that the RNIO flag in GENFLAGS is on and 
passes control to the format appendage routine 
(AMDSYSO6). 


If the SYS bit is off and the FID is 07, AMDPRDMP AMDPR DMP 
verifies that the CCWS bit in SIOFLGS or the CCWI 

bit in IOF_LGS2 is on, then passes control to the CCW 

comprehensive record format appendage. 
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From MO13 


Part 3 
Input Process 
Record GENFLAGS 5 
| FID =03 | | and | SYSM=1 
Record GENFLAGS 
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E: {eee} ALLS = 1 e 
" (5106 
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| | Deviceg] | and [ secs =1 . 
Record 


Oo 
TI 
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“” 
ND 
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Record 

SVCNUMS | = or 
Record PIFLGS 


8200 


PICODES | 


0) 
m 
2 
a 
[— 
> 
G) 
” 


and SELP = 1 


Record 


i 
ine 





Output 


If record matches the EDIT 
options in effect, format the 
record and its associated 

timestamp record: J/PRINTER 


All or selected SYSM records 


° 
o 
o 
0 
.* 
0 
o 
0 
0 
0 


All comprehensive system 
records 


All SSCH or RSCH records 


Selected SSCH or RSCH 
records 


All 10, PCI, EOS, HSCH, 
CSCH, or MSCH records 


Selected |O, PCI, EOS, HSCH, 
CSCH, or MSCH records 


All SVC records 


Selected SVC records 


All Pi records 


Selected P| records 


All DSP records 





Wal Jo Ajiedoig — sfeuajeyy pesuaory 
WAI JO S[BUaeJA papdjsay sulejaoey 


C861 7861 ‘dioDd Wal 148UAdoD © 7-681 I-87AT 


(ANGUddWy) dung jg ‘¢ Jadeys 


Ip-t 


C C 


PRDMP Diagram 12. The EDIT Control Statement (Part 8 of 10) 
Extended Description Module Label Extended Description Module Label 


6 The system format appendages perform more tests @ AMDSYSO1 checks the SVCFLGS field. If the ALLV AMDSYSO1 
on the record to ensure that the record qualifies bit is on, or if the SELV bit is on and the SVC number 

for formating according to the EDIT options that are of the record corresponds to one in the SVCNUMS 

in effect. field, AMDSYS0O1 formats the record. 


e AMDSYSO3 determines whether all SYSM records AMDSYS03 e AMDSYSO2 checks the record EID to determine the AMDSYSO2 
are to be formatted (SYSM bit in GENFLAGS is on) record type. If the record is a PI record, it checks the 
or just selected event records. PIFLGS field. If the ALLP bit is on, or if the SELP 


e AMDSYSOO, AMDSYSO1, AMDSYSO2, AMDSYS04, AMDSYSOO bit is on and the PI code in the record corresponds to 
AMDSYS05, and AMDSYSO6 check the SYS bitin | AMDSYSO1 one in the PICODES field, AMDSYS02 formats the 


GENFLAGS to determine whether all comprehen- AMDSYS02 record. If the record is a DSP record, AMDSYSO2 
sive records should be formatted or just selected AMDSYS04 verifies that the DSP bit in GENFLAGS is on, then 
event records. AMDSYS05 formats the record. 
AMDSYS06 
e If the user specifies the CPU option, AMDSYSOO AMDSYSOO 


verifies that the given CPU value matches the 
CPU ID in the IO and/or SSCH record. 


e@e AMDSYSOO determines whether the record is on AMDSYSOO 
10 or SSCH record by checking the EID field. If it 
is an SSCH record, AMDSYSOO checks the 
SIOFLGS field. If the ALLS bit in on, or if the 
SELS bit is on and the device address in the record 
is among those specified in SSIODVADS, AMDSY S00 
formats the record. If the record is an |O record, 
AMDSYS0O0 checks the IOFLGS2 field. If the ALLI 
bit is on, or if the SELI bit is on and the device 
address in the record is among those included in 
IODVADS, AMDSYSO0 formats the IO record. 
Either the SSCH or the SIO option cause formatting 
of SSCH and RSCH records. The !O option causes 
formatting of the 10, PC!, EOS, HSCH, CSCH, and 
MSCH records. 
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PRDMP Diagram 12. The EDIT Control Statement (Part 9 of 10) 


From MO13 
Pa 








Input Process 
G continued 
Record GENFLAGS 
| | EID=6201 | | EXT =1 e All EXT record 
Record 


e All RNIO records 


All RR records 


EIp = 4002 Z and 


4003 





Mt 


Record 
GENFLGS1 
e All SLIP records 
Record GENFLAGS 
| | ElO=4001_ | | and| SRM=1_| e All SRM records 
Record 
and 


Ail RNIO records (produced 


Record and 
GENFLAGS under ACF/VTAM Version 2) 


|] ew=8 | | ang 


OC 


Record GENFLAGS 
a FID = 07 | | and | CCWS = 1 








oS 
=io 
So 
or 


SIOFLGS 
FID = 5106 | Devices | ALLS = 1 e All SSCH CCW records 
lIODVADS = or 
| | Device Wl | and| SELS=1 @ Selected SSCH CCW records 
Record 


|| FID = 07 | | and CCWI = 1 





Record and 


100 
EID = sz00l Device f 
5101 





lIOSFLGS2 
ALLI=1 


G) 
m 
= 
n 
— 
> 
G) 
“” 


All 1|O CCW records 


or 


IODVADS |= 
and [_SELI= 1 


I 


e Selected |O CCW records 


Cc 





Output 


/IPRINTER 
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6 
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‘Sep2 > To Obtain Next GTF Record 
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PRDMP Diagram 12. The EDIT Control Statement (Part 10 of 10) 


Extended Description Module Label 
6 continued 
e AMDSYS04 checks the record EID to determine AMDSYS04 


the record type. If the record isan SRM record, 
it verifies that the SRM bit in GENFLAGS is on, 
then formats the record. If the record is an RR 
record, AMDSYS04 verifies that the RR flag in 
GENFLAGS is on, then formats the record. If 
the record is an RNIO record, AMDSY S04 verifies 
that the RNIO flag in GENFLAGS is on and then 
formats the record. If the record is a SLIP record, 
AMDSYS04 verifies that the SLIP flag in 
GENFLGS1 is on and then formats the record. 


AMDSYSO05 verifies that the EXT flag in AMDSYS05 
GENFLAGS is on, then formats the record. 
AMDSYS0O6 verifies that the RNIO flag in AMDSY S06 
GENFLAGS is on, then formats the record. 
If the user specifies the CPU option, AMDSYS0O7 AMDSYS0O7 


verifies that the given CPU value matches the 
CPU |D in the |O and/or SSCH record. 


AMDSYS07 checks the CCWS bit and the CCWI AMDSYS0O7 
bit in GENFLAGS to determine whether CCW trace 
records should be formatted for SSCH and IO 
events. If either or both CCW bits are on, 
AMDSYS0O7 determines whether the record is an 

10 or SSCH record by checking the EID field. 

When the CCWS bit is on, and the record is an SSCH 
record, AMDSYS0O7 checks the SIOFLGS field. 

If the ALLS bit is on, AMDSYSO7 formats all SSCH 
CCW records. If the SELS bit is on and the device 
address in the record is among those specified in 
SIODVADS, AMDSYS0O7 formats selected SSCH 
CCW records. When the CCWI bit is on, and the 
record is an |O record, AMDSYSO7 checks the 
IOFLGS2 field. If ALLI bit is on, AMDSYSO7 
formats all 1|O CCW records. If the SELI bit is on 
and the device address in the record is among 

those specified in I|ODVADS, AMDSYS0O7 formats 
selected 10 CCW records. 


After the record is formatted, AMDPRDMP writes it in AMDPRCOM 
the PRINTER output data set for later printing: 

AMDRPDMP then obtains the next GTF record for 

formatting. 
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Section 3: Program Organization 


This section describes how AMDPRDMP is organized to carry out the formatting 
and printing of information. It has three parts: 


Program Loading 


A descnption of program loading. 


Module calling sequences for AMDPRDMP initialization, control statement 
processing and control statement execution. 


A descnption of the data-reading operation. 


As shown in Figure 3-2, there are eight modules that are resident in virtual 
storage and link-edited into the single AMDPRDMP load module dunng system 
generation: 


AMDPRCTL is the main control module. It initializes the AMDPRDMP 
program and the common communication area, scans the user control 
statements, and initiates the execution of the functions requested by the 
control statements. 


AMDPRCOM contains the common communication area (COMMON) used 
by all AMDPRDMP modules; it also contains a number of small service 
routines used by other AMDPRDMP modules. 


AMDPRRDC is the read control module. 


AMDPRSEG is the segment loading module. It loads AMDPRDMP 
modules from JOBLIB, STEPLIB, or SYS1.LINKLIB into virtual storage 
when they are needed to perform functions requested by format control 
statements. 


AMDPRPMG is a message module that contains the addresses and text of 
AMDPRDMP messages. 


AMDPRUIM is the exit interface module. It loads the service modules 
provided for the exits and invokes BLSQECT to link to exits. 


AMDPREAD reads the dump records and builds maps of the dump data set 
if SYSUT] is not defined. 


AMDPRGSA contains glue service routines for user exit storage access, and 
pmnt and index services. 
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In addition to the modules that are resident in virtual storage, there are four other 
categories of AMDPRDMP modules that are resident in SYSJ.LINKLIB: 


@® Executor modules for all format control statements except EDIT. 
@® Service modules for all format control statements except EDIT. 
@ EDIT modules. 
® Read initialization modules. 

Executor Modules 
AMDPRGCD AMDPRNUC AMDPRPJB 
AMDPRLPA AMDPRPCR AMDPRPMS 
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PRINT NUCLEUS 
PRINT SQA 
PRINT CSA 


Executor 


AMDPRNUC 





PRINT REAL 
PRINT STORAGE 


Executor 


AMDPRPMS 





CPUDATA 


Executor 


AMDPRGCD 





AMDPRFEFMT function 


AMDPRECT 


Figure 3-2. AMDPRDMP Loading 
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PRINT C JRRENT PRINT JOBNAME 





Executo: Executor 
AMDPRPCR AMDPRPJB 





AMDPRUIM 


LPAMAP 


Executor 
AMDPRDPS 


AMDPRLPA 





AMDPRDMFP load module 






AMDPRCOM 


AMDPRRDC |- -| AMDPRMST |- -| AMDPRSLI 


AMDPRSEG |- -| AMDPRABS ) 


AMDPRCTL 





(executor for 


AMDPRUIM |- -| AMDPRLRF 


statements) 


AMDPREAD AMDPRPMG |- -| AMDPRLOD 


AMDPRGSA 





--| AMDPRCMC 


BIEL 
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Service Modules 


EDIT Modules 
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Executor modules govern the execution of functions requested by all 
AMDPRDMfP control statements except EDIT. The EDIT modules form a 
category of their own.) The executor routines for function control statements 
(CVT, TITLE, GO, ONGO, NEWDUMP, NEWTAPE, SEGTAB, and END) are 
part of AMDPRCTL. The executor modules for SUMMARY, FORMAT, 
LPAMAP, CPUDATA, and PRINT are in SYS].LINKLIB. They are brought 
into virtual storage by AMDPRSEG just before the associated format control 
statement is executed. All other control statements are user exits whose program 
modules are defined in the ECT. They are not loaded by AMDPRSEG, but are 
linked to AMDPRUIM via BLSQECT. 


AMDPRDPS AMDPRFMT 
AMDPRECT AMDPRFUB 


Service modules perform functions that are either common to several executor 
modules or can be used by user-exit modules. Some small service routines are 
contained in AMDPRCOM. However, the larger service modules are in 
SYSI.LINKLIB. Like the executor modules for these control statements, the 
service modules in SYS].LINKLIB are brought into virtual storage by 
AMDPRSEG just before the control statement is executed. The service modules 
for user-exit routines are loaded by AMDPRUIM during initialization and are 
resident for the remainder of AMDPRDMP processing. 


AMDPRAPP AMDPRFRM AMDPRSMG AMDSYS02 AMDSYS07 
AMDPREID AMDPRGET AMDPRSN2 AMDSYS03 AMDSY101 

AMDPREXT AMDPROOT AMDPRSN3 AMDSYS04 IMDUSRF9 
AMDPRFLT AMDPRREC AMDSYS00 AMDSYS05 IMDUSRFE 
AMDPRFMG AMDPRSCN AMDSYSOI AMDSYS06 IMDUSRFF 


EDIT modules are loaded into virtual storage from SYS].LPALIB to execute the 
function requested by the EDIT control statement. The EDIT function executes 
in two major loads: EDIT keyword processing and input data set formatting 
(editing). Figure 3-3 represents maps of the AMDPRDMP storage area during 
the two loads. Storage structure during the second load depends on the type of 
input data set, dump or external. 


The three parts of Figure 3-3 contain the resident modules for AMDPRDMP 
(described previously). Figure 3-3A also contains the EDIT initialization module 
(AMDPROOT) and the keyword scan modules (load module name 
AMDPRSCN). Load module AMDPRSCN contains the following EDIT 
modules: 


AMDPRSCN, the EDIT keyword isolation module. 
AMDPRSCN2?, the EDIT keyword processing module. 
AMDPRSCN3, the EDIT control statement termination module. 
AMDPREID, the EID table. 

AMDPRSMG, a message module. 
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3A - AMDPRDMP Storage During EDIT Keyword Scan 
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3B - AMDPRDMP Storoge During Formatting of Dump Data Set Records 
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3C - AMDPRDMP Storage During Formatting of External Data Set Records 


Figure 3-3. AMDPRDMP Storage During EDIT Control Statement Execution 
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The remainder of AMDPRDMP’s storage area is buffers used by other 
AMDPRDMP functions. If EDIT is not the first control statement for this 
execution of AMDPRDMP, module AMDPREAD is also in storage. 


Figure 3-3B depicts AMDPRDMP’s storage area after EDIT keyword scan, if 
GTF buffers are to be edited from a dump data set. AMDPROOT remains in 
storage because it contains the EDIT communication table (AMDPRTAB) needed 
by all EDIT modules. Load module AMDPRXED has replaced AMDPRSCN in 
storage. AMDPRXED contains the following EDIT modules: 


AMDPRFRM, the EDIT execution control module. 

AMDPRGET, the EDIT I/O module. 

AMDPRELT, the EDIT record filter module. 

AMDPREXT, the user exit interface module. 

AMDPRAPP, the format appendage interface module. 

AMDPRREC, the control record format and hexadecimal dump module. 
AMDPRFMG, the EDIT message module. 


Figure 3-3B also contains system and user/component format appendages that are 
loaded by AMDPRAPP, using AMDPRSEG, to format input records. The 
following are format appendages: 


@ AMDSYS00, AMDSYSO1, AMDSY101, AMDSYS02, AMDSYS03, 
AMDSYS04, AMDSYS05, AMDSYS06, AMDSYS07 — system format 
appendages. 


@ IMDUSRF9 — VSAM format appendage. 

@ IMDUSRFE — SAM/PAM/DAM format appendage. 

@ IMDUSRFF — OPEN/CLOSE/EOV component format appendage. 

The remainder of the AMDPRDMP storage area is occupied by AMDPRDMP 
buffers that are needed to obtain information from the dump data set and 
optional user exit modules. 

Figure 3-3C differs from 3B in that external data set buffers, into which records 
from an external data set are read, occupy part of the storage devoted to format 
appendages in 3B. Following these buffers are the format appendages, and any 
remaining storage is occupied by AMDPRDMP buffers left from a different 
AMDPRDMP operation, and module AMDPREAD. 


Read Initialization Modules 


AMDPRLOD AMDPRABS 
AMDPRMST AMDPRLRF 
AMDPRSLI AMDPRCMC 


These modules are brought into virtual storage from SYS1.LINKLIB as they are 
needed. The functions of the modules are as follows: 


@ AMDPRLOD, the work data set load module, loads the input data set into 
SYSUT1 or SYSUT2. 
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@ AMDPRMST 1s invoked to store information from the input data set in the 
common communication area (COMMON). The information is used during 
the execution of format control statements. 





@ AMDPRSLI obtains dump data information descnbing the boundaries and 
layout of the storage map, and saves this information in the pnnt dump 
COMMON area. AMDPRSLI 1s called by AMDPRMST, by the executors 
of the PRINT NUCLEUS, SQA, CSA, and STORAGE control statements 
and by AMDPRFUB (AMDPRFUB determines the private boundaries of a 
given address space). 


@ AMDPRABS formats and prints the dump abstract title page. 
@ AMDPRLREF formats and prints the console-initiated loop trace records. 


@ AMDPRCMC determines cross memory information for the dumped system 
and saves it in COMMON. 


Reading Input Data 


AMDPRDMP maintains a chain of buffers to contain input dump data. The 
resident read control module, AMDPRRDC, manages the buffer chain and 
handles requests for dump data from the other modules. When AMDPRRDC 
receives a request for data not in a buffer, the module calls AMDPREAD to read 
the data if possible. Following are descriptions of the way these modules perform 
data reading and of the manipulation of input buffers. J 





Read Control Module — AMDPRRDC 


AMDPRRDC receives control from the other AMDPRDMP modules via a 
BRREAD macro instruction (see Section 6). When the DATA function is 
indicated by the macro instruction, it is a request for input dump data. 
AMDPRRDC’s handling of the request depends on whether data requested is for 
a CPU ID or for a real or virtual address within the dump. 


CPU Data Request!) AMDPRRDC returns a pointer to the data which is set up 
in a fixed format. (See Section 5: Data Areas for the format of the CPU Status 
Area.) AMDPRRDC gets the information from COMMON; however, if input is 
from AMDSADMP, AMDPRRDC gets the information by searching the 
AMDPRDMfP buffers for the CPU status record for that CPU ID. If the record 
is not in a buffer, AMDPRRDC calls AMDPREAD to read the record. Ifa read 
is unsuccessful AMDPRRDC branches to the error handler in effect. 


Note: The dump header record is saved during print dump initialization 
processing. A pointer to this data is saved in COMMON and is available to all 
print dump modules. Requests for the header record do not use the BRREAD 
facility. They directly access the information based on the address initialized in 
COMMON. 
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Requested Data at Real Address: AMDPRRDC verifies that the input contains 
real storage data and that the address (rounded down to a 4K _ boundary) is valid. 
Then AMDPRRDC determines whether the requested data is already in a buffer 
and, if so, returns a pointer to the buffer. If the data cannot be located in a 
buffer, AMDPRRDC calls AMDPREAD to read the data. If an I/O error occurs 
or if any of the validity checks fails, or if the data is not in the input dump, 
AMDPRRDC branches to the error handler in effect. 


Requested Data at Virtual Address: AMDPRRDC rounds the requested address 
down to a 4K boundary and performs address prefixing, if necessary, using the 
PREFXRBV value in COMMON. Then AMDPRRDC attempts to locate the 
data with one of the following results. 


@ The data is already in a buffer. AMDPRRDC returns a pointer to the data 
unless the buffer is marked for invalid data. In that case the active error 
handler receives control. 


@ The data is not in a buffer and the dump contains data from real storage 
equivalent so it can get the data from the real portion of the dump. If the 
data is not available in the real portion, AMDPRRDC attempts to get it from 
the virtual dump, if input contains virtual storage data. In any case, 
AMDPRRDC searches the input buffers for the data and calls AMDPREAD 
to read the data if it is not ina buffer. Finally, AMDPRRDC returns a 
pointer to the data in a buffer, or it branches to the active error handler if the 
buffer is marked as having invalid data. 


@ The data is not in a buffer and the dump contains only virtual data. 
AMDPRRDC calls AMDPREAD to read the data from the virtual address. 
AMDPRRDC checks the validity of the returned data and either returns to 
the caller or branches to the active error handler, if the data is marked 
invalid. 

Length Specified for Requested Data: AMDPRRDC adds the requested data 

address to the requested length (up to 4K). If the total crosses a page boundary, 

AMDPRRDC does the following: 

@ Obtains a 4K buffer to store the requested data. 

Calls AMDPREAD to obtain the page containing the requested address. 

Moves the range from the first page to the beginning of the buffer. 

Calls AMDPREAD to obtain the page containing the remainder of the range. 


Moves the remainder of the range to the buffer. 


Returns the address of the 4K. buffer. 


If the requested address range does not cross a page boundary, AMDPRRDC 
processes the request normally. 


LY28-1189-2 © Copyright IBM Corp. 1982 1985 Chapter 3. Print Dump (AMDPRDMP) 3-5] 


Read Buffer Manipulation 


Contains Restricted Materials of IBM 
Licensed Materials — Property of IBM 


To minimize the number of I/O operations required to obtain information from 
the input data set without constraining the available storage, AMDPRRDC 
obtains a fixed number of dump data set buffers. In addition, it assigns a priority 
to the buffers so that frequently-used information remains in storage where it can 
be accessed without an I/O operation. 


AMDPRDMfP builds a buffer map for each buffer, then chains the buffer maps 
together in a queue. The highest priority buffer (represented by the first buffer 
map in the queue) contains the storage block that was last referenced. When a 
different storage block is required, AMDPRRDC rechains the buffer maps to 
cause the buffer containing the required block to be represented first in the buffer 
map queue. In this way, frequently-used data is represented first in the buffer 
map queue, and data that is not referenced is pushed down in the queue until it 
eventually is replaced by new dump information. 


Rechaining the Buffers: As AMDPRRDC fills requests for data, the buffers are 
rechained via their maps as follows (see also Figure 3-4): 


@ If there is a request for data that is not in a buffer, and there is an empty 
buffer available (call it buffer D as in PRDMP Figure 3-4), AMDPRRDC 
calls AMDPREAD to read the data into buffer D, enqueues the buffer D 
map as the first buffer map (most-recently referenced buffer), then chains the 
buffer D map to point to the buffer map for the buffer that was previously 
most-recently referenced (buffer C in Figure 3-4). 


@ If there is a request for data that is not in a buffer, and there re no empty 
buffers available, AMDPRRDC releases the buffer whose map is last in the 
queue (buffer A in Figure 3-4). It places the address of buffer A map in the 
buffer map queue base, chains the buffer A map to point to the buffer map 
previously first in the queue (buffer D in Figure 3-4), removes the buffer A 
map from its former place in the queue, and calls AMDPREAD to read the 
data into buffer A. 


@ If there is a request for data that is already in a buffer (buffer B in 
Figure 3-4), AMDPRRDC places the address of the buffer B map first in the 
queue, chains the buffer B map to point to the buffer map that was previously 
first in the queue (buffer D in Figure 3-4), and removes the buffer B map 
from its former place in the queue. 
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( REQUEST FOR DATA NOT IN BUFFER, BUT EMPTY BUFFER IS AVAILABLE 


BEFORE: 
— 





AFTER: 


me et td 





REQUEST FOR DATA NOT IN BUFFER, AND NO BUFFERS ARE AVAILABLE 


BEFORE: 


AFTER: 








REQUEST FOR DATA ALREADY IN BUFFER B 


BEFORE: 


—P 8 





AFTER: 
KEY: 
MEE Pointer from AMDPRRDC 
fF 4K Buffer Represented by Buffer Map 
( Figure 3-4. Read Buffer Chaining 
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Module Calling Sequences for AMDPRDMP Functions 





The following maps show sequential flow of AMDPRDMP modules. Each map 
indicates the active modules for a specific function and describes the operations 
performed by those modules. Entry point names are also provided where they 
may differ from the module names. PRDMP Figure 3-5 explains the design of 
sequence map. 


For more detailed descriptions of the functions, see the diagrams in Section 2: 
Method of Operation. A reference to the corresponding diagram accompanies 


each map. 
Single Path Flow Alternate Path Flow 
Calling Module Calling Module 
Module A Module A 
Module A! Module B 
Module A? Module B! 


Module B (ENTRY 1) 


The calling module first calls A, The calling module determines whether 
which then calls A! and A. to call A or B for this operation. If B 
When A returns, the caller passes receives control, it calls B! before 
contro] to B at entry point returning to the caller. 

ENTRY]. 


Figure 3-5. Example of Calling Sequence Map 
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Initialization (Diagram 2) 


AMDPRCTL (AMDPRCTL) — Analyzes EXEC statement parameters and stores value s in 
(AMDPRMSC) COMMON; reads in control statements. Scans first formatting 
statement. 


AMDPRCOM (AMDPRWTR, AMDPRMSG) — Opens PRINTER and/or INDEX data 
sets. Gets title from the operator. 


AMDPRUIM (AMDPRUIM) _ — Initializes exit interfaces: Puts ABDPL and SRA addresses 
in common. 


AMDPRSEG -— (after the first formatting statement has been read) 
AMDPRRDC (AMDPRRDC)-_  — INIT function: Loads AMDPRLOD (if input on 


tape), initializes and maps buffers, loads and deletes 
AMDPRMST, and builds ASCBMAP. 











AMDPRLOD — If tape input, loads dump to SYSUTI workfile 
and builds dump maps. 


AMDPREAD — If SYSUT1 was not defined, builds dump maps. 
AMDPRMST — Initializes COMMON with dump data including symptoms 


extracted from the dump header record for an SVC dump to be 
presented as part of the title page output produced by this 


module. 
AMDPRSLI — Provides information related to the boundaries 
describing the various areas that comprise the storage 
layout. 


AMDPRUIM — Invokes BLSQECT to link to the user-header exit 
modules 


AMDPRRDC (AMDPRRDD) — Locates the dump records 


AMDPREAD- — Reads records into buffers. 
AMDPRCMC_ — Determines cross memory ASIDs. 


AMDPRABS — Prints the abstract title page. 

AMDPRLRF — Formats and prints the instruction trace data (created by the 
console-initiated loop recording). 

Function Statement Processing (Diagram 4) 


AMDPRCTL (AMDPRMSC) — Processes CVT, GO, ONGO, NEWDUMP, NEWTAPE, 
SEGTAB, and TITLE statements. 


AMDPRCOM (AMDPRSYN) — Writes syntax error messages. 


LPAMAP (Diagram 4) 
AMDPRCTL (AMDPRMSC) — Scans control statements. 
AMDPRLPA — Executor: controls formatting and printing of LPA map. 


AMDPRCOM (AMDPRGFR, AMDPRWTR, AMDPRMSG) — Writes LPA title, 
formats output lines, writes messages. 


AMDPRRDC (AMDPRRDD) — DATA function: locates LPA records. 


AMDPREAD — Reads records into buffers. 
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END Statement (Diagram 5) ) 


AMDPRCTL (AMDPREND) — Prints execution statistics or causes transfer of dump to SYSUT2 (if 
END is the only statement). 


AMDPRRDC (AMDPRRDQC) — INIT function: loads AMDPRLOD. 
AMDPRLOD — Transfers dump data set to temporary workfile. 
AMDPRCOM (AMDPRMSG) — Prints statistic messages and prints the dump index on the 
PRINTER file (if the INDEX DD is not included in the 
JCL). 
AMDPRCTL (AMDPRXIT) — Terminates AMDPRDMP. 


AMDPRRDC (AMDPRRDA) — Free buffers. 
AMDPRUIM (AMDUSRDL) — Calls BLSQEXTI to delete exit services. 


Formatting Statement Processing (Diagrams 6-10) 
AMDPRCTL (AMDPRMSC) — Scans each control statement and determines processing path. 
AMDPRCOM (AMDPRSYN) — Writes syntax error messages. 
AMDPRUIM (AMDUSRXT) — Invokes BLSQECT to link to the user module 
corresponding to the user verb, for example, 


SRMDATA, MTRACE or ASMDATA. 


AMDPRRDC (AMDPRRDC)- — INIT function: ensures initialization for 
dump has been performed. 


BLSQEXTI — Load exit service and initialize ABDPL and SRA. 





BLSQROUT — To invoke BLSQECT to link to exit module. 


AMDPRRDC (AMDPRRDD) -— DATA function: provides data for exit 
module. 


AMDPRFMT — Provides format service for exit module. 
AMDPRSEG- — Loads processing path for LPAMAP, EDIT, SUMMARY, 
CPUDATA, or PRINT statements; calls for each module to store its 
entry addresses in COMMON. 


AMDPRRDC (AMDPRRDC)- — INIT function: ensures initialization for 
dump is performed. 


Executor module for statements processed by AMDPRSEG. 
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CPUDATA (Diagram 10) 
AMDPRCTL (AMDPRMSC) — Scans control statement. 


AMDPRGCD — Executor: Prints general data for each CPU including: all registers, the 
current PSW, logica] and physica] CCA, the current PCLINK STKE queue, 
the PSA, and a one line indication of what the four cross memory ASIDs 
are. Loads format modules IEEVCSD, IEALCCP, IEEVPCCA, IEAPSAP, 
and IEASVTP. 





AMDPRRDC (AMDPRRDD) — Locates data in the dump. 

_ AMDPREAD — Reads data into buffers. 

AMDPRCOM (AMDPRGFR, AMDPRWTR) — Prints title. Formats and writes 
output. 

Verb Exits Defined in the ECT (Diagram 7) 

AMDPRUIM (AMDUSRXT) _ — Initializes exit interface. Provides storage access routine 

(AMDMEMAR), write routine (AMDWRITR, and index routine 


(AMDINDEX) for user exits. Formats and prints requested 
information. 





User exit 

AMDPRRDC (AMDPRRDD) — Locates data for user exit. 
AMDPREAD — Reads records into buffers. 

AMDPRFMT — Formats output. 

AMDPRCOM (AMDPRWTR) — Writes output. 


AMDPRCOM (AMDPRNDX) — Writes index entries. 


PRINT STORAGE/REAL (Diagram 9) 
AMDPRCTL (AMDPRMSC) — Scans control statement. 


AMDPRPMS — Executor: Determines storage ranges to be printed from PRINT 
parameters. 


AMDPRCOM (AMDPRWTR) — Writes print title. 

AMDPRDPS (AMDPRPCB, PRNTSTG) — Builds and enqueues PCBs to describe 
storage ranges for printing. Prints 
storage using PCBs. 

AMDPRRDC (AMDPRRDD) — Locates dump records as required. 
AMDPREAD — Reads records into buffers. 


AMDPRCOM (AMDPRWTR) — Writes output. 
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PRINT NUCLEUS/SQA/CSA (Diagram 9) 


AMDPRCTL (AMDPRMSC) — Scans control statement. 





AMDPRNUC -— Executor: Controls printing of nucleus, system queue area, and common 
service area. 


AMDPRCOM (AMDPRWTR) — Writes nucleus title. 


AMDPRUIM (AMDRUSRXT) — (NUCLEUS only) Interfaces with user’s print 
nucleus exit. 


AMDPRDPS (AMDPRPCB, PRNTSTG) — Builds and queues PCBs for storage to 
be printed. Prints storage. 


AMDPRRDC (AMDPRRDD) — DATA function: Locates records. 
| AMDPREAD — Reads records into buffers. 


AMDPRCOM (AMDPRWTR) — Writes output. 


PRINT CURRENT (Diagram 10) 
AMDPRCTL (AMDPRMSC) — Scans control statement. 


AMDPRPCR- — Executor: controjs formatting and printing of control blocks and of region 
for current task. 


AMDPRCOM (AMDPRWTR) — Writes CURRENT title. 
AMDPRUIM (AMDUSRXT) — Interfaces with CURRENT/JOBNAME exit. 


AMDPRFSC -— Controls formatting and printing of contro] blocks related to address 
space and task. 





AMDPRFUB W— Determines region boundaries for building PCBs. 


AMDPRUIM (AMDUSRXT) — Interfaces with the SUMMARY FORMAT verb exit to 
format control blocks related to address space and task. 


AMDPRDPS (PRNTSTG) — Prints user region specified by PCBs. 
AMDPRRDC (AMDPRRDD) — Locates dump records. 
AMDPREAD — Reads records into storage. 
AMDPRCOM (AMDPRWTR) — Writes output. 


AMDPRFSR (TCBSMRY) — Writes TCB summary. 
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PRINT JOBNAME (Diagram 10) 
AMDPRCTL (AMDPRMSC) — Scans control] statement. 


AMDPRJB — Executor: scans jobname in contro] statement and builds jobname lists; 
controls formatting and printing of control blocks and storage for jobnames. 


AMDPRCOM (AMDPRSYN, AMDPRWTR) — Writes syntax error messages. 
Writes output. 


AMDPRUIM (AMDUSRXT) — Interfaces with CURRENT/JOBNAME exit. module. 
AMDPRRDC (AMDPRRDD) — Locates data in dump. 

AMDPREAD — Reads required records into buffers. 
AMDPRFSC — Controls formatting of system control blocks for each jobname. 
AMDPRFUB W— Determines region boundaries for ASCBs. 


AMDPRIUM (AMDUSRXT) — Interfaces with the SUMMARY FORMAT verb exit to format 
control blocks related to address space and task. 


AMDPRDPS (PRNTSTG) — Formats and controls printing of storage areas. 
AMDPRRDC (AMDPRRDD) — Locates data in dump. 
AMDPREAD — Reads records into buffer. 


AMDPRCOM (AMDPRWTR) — Writes output. 





AMDPRFSR (TCBSMRY) — Prints TCB summary. 
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EDIT (Diagram 12) 


AMDPRCTL (AMDPRMSC) — Scans EDIT statement. 





AMDPRSCN — Scans EDIT parameters. 

AMDPROOT — Initializes AMDPRTAB communications table. 

AMDPRSN2 — Processes EDIT parameters. 

AMDPRCOM (AMDPRSYN) — Writes syntax error messages. 

AMDPRSN3 — Processes statement end. Sorts range tables, checks options. 

AMDPRFRM — Controls editing/printing of GTF data. 

AMDPRCOM (AMDPRWTR, AMDPRSYN, AMDPRMSG) — Writes EDIT output. 
Writes syntax error 
messages. Writes 
output messages. 


AMDPRGET — Obtains GTF record for processing. 


AMDPRCOM (AMDPRWITR, AMDPRSYN) — Writes output or syntax error 
messages. 


AMDPRRDC — Locates required records. 


AMDPREAD — Reads records into buffer. 





AMDPRREC (AMDPRCON) — Formats GTF control records. 


Writes the formatted 
line. 


| aMDPRCOM (AMDPRWTR, AMDPRGFR) — Formats an output line. 
AMDPRFLT — Checks whether options specify processing the current record. 
AMDPREXT — User exit interface. 


AMDPRCOM (AMDPRSYN, AMDPRWTR) — Syntac error messages. 
Writes output. 


AMDPRSEG — Loads user exit module. 


AMDPRREC (AMDPRHEX) — Formats AID, FID, AND EID fields and 
writes the fields in hexadecimal. 


User exit routines. 
AMDPRAPP — Interfaces with format appendage. 


AMDPRCOM (AMDPRSYN, AMDPRWTR, AMDPRGFR) — 
Hexadecimal conversion routine, formats and prints an output line. 


AMDPRSEG — Loads the format appendage. 


AMDPRREC (AMDPRHEX) -— Formats the AID, FID, and EID 
fields of the record. Writes the fields 
in hexadecimal. 


AMDPRCOM (AMDPRGFR, AMDPRWTR) — Formats an 
output line. 
Writes the 
formatted line. 


Format appendage Jo 
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Section 4: Data Areas 


This section describes the following data areas that are built and used by 
AMDPRDMP modules: 


Print dump index description table (AMDMNDXT). 
ASCB map (ASCBMAP). 

ASID index (ASIDNDX). 

Buffer map entry. 

Common communication area (COMMON). 

CPU status area. 

Current TCB list (CURRLIST). 

Dump map entry. 

EDIT communication table (AMDPRTAB). 

Exit parameter list (ABDPL). 

Exit control table (ECT) entry. 

Exit control table entry mapping (ECTE). 

Mapping for dump header and processor status input records (AMDDATA). 
Path descriptor element. 

Print control block (PCB). 

TCBLIST entry. 


Address Space Control Block Map (ASCBMAP) 


Size: Variable; depends on number of ASIDs. For each ASID, there is a map 
entry and table entry. 


Map — 16 static bytes — 2 bytes per active ASID (rounded up to double word 
boundary.) 


Table — 8 bytes per active ASID. 
Created by: AMDPRRDC 
Use: Map contains the ASID of each address space on ASCB dispatching queue 


at time of dump. Table contains the corresponding ASCB address and segment 
table address for each ASID in map. 


Map Entry 

Offset Size Field Name Description 

0 (0) 4 ASCBTAB Pointer to the table of addresses of ASCBs and 
segment tables. 

4 (4) 2 ASCBNUM Number of address spaces in the table. 

6 (6) 2 ASCBRESV Reserved. 

8 (8) 4 ASMAPLEN Length of ASCB map. 

12 (C) 4 ASTABLEN Length of ASCB/SEGTAB table. 

16 (10) 2 ASID First address space ID in table. 

XX (xx) 2 ---- Last ASID in table. 
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Table Entry 





Offset Size Field Name Description 


0 (0) 4 ASCBADDR Address of ASCB associated with first ASID in 
map. X°80’ in the high order byte indicates 
AMDPRRDC was unable to read 
corresponding ASID for this ASCB. ASID 
field is set to FFFF. 


4 (4) 4 SEGTABAD Real address of segment table associated with 
first ASID in map. 


Exit Parameter List (ABDPL) 
Size: 96 bytes 
Created by: AMDPRUIM 


Use: The exit parameter list serves as a communications area between 
AMDPRDMfP, user exit routines, and the AMDPRDMFP service routines. The 
BLSADPL macro maps the exit parameter list. The exit parameter list is created 
by AMDPRDMfP, IPCS and SNAP with the intent of interfacing to exit routines. 
For more detailed information on the mapping, see MVS/XA IPCS Logic & 
Diagnosis. (The IHAABDPL is still available for compatibility. It includes the 
BLSABDPL macro.) 


Address Space Identifier Index (ASIDNDX) 





Size: 112 bytes per table. 
Created by:y AMDPREAD or AMDPRLOD. 


Use: The index is searched for the requested ASID from which the corresponding 
map address is found (used to find the block containing the requested address). 


Offset Size Field Name Description 

0 (0) 4 ASDXLNK Pointer to next table or zero. 

4 (4) 36 ASDXASID 18 2-byte fields, each of which contains an 
ASID. 

40 (28) 72 ASDXMAP 18 4-byte fields, each of which contains the 


address of the first dump-data map for the 
corresponding ASID. 
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Buffer Map Entry 


Size: 20 bytes. 


Created by: AMDPRRDC. 


Updated by: AMDPRRDC, AMDPREAD. 


Use: One buffer map entry is built for each AMDPRDMP buffer. 


Offset 
0 


16 
18 
20 


Common Communication Area (COMMON) 


Size: 2884 bytes. 


(0) 


(4) 
(8) 


(C) 


(10) 
(12) 
(14) 


Size 
4 


2 
2 
l 
l 


A. 
..XX 


XXXX 


Field Name 
BUFFLINK 


BUFFPTR 
BUFFREAL 


BUFFVIRT 


BUFFASID 
BUFFCPU 
BUFFLAG 
INVALFLG 
BUFFCOM 


Created by: AMDPRCOM. 


Used by: All AMDPRDMP modules. 


Description 

Address of next buffer map entry in chain or 
zero if last entry. Buffer map entries re chained 
in order from most-recently referenced buffer to 
least-recently referenced buffer. 

Address of an input buffer. 

Address of real storage location of the 4K block 
of storage contained in the dump record that 
was read into the associated buffer. 

Address of virtual storage location of the 4K 
block of storage contained in the dump record 
that was read into the associated buffer. 

ASID of data in buffer. 

Logical CPU ID if data is a CPU status record. 
Flags: 

Invalid data in the buffer. 

ASID of data is FFFF. 

Reserved. 


Use: Communication among AMDPRDMP modules. 


Offset 


16 


20 


24 
32 
36 
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(0) 


(4) 
(8) 


(C) 
(10) 
(14) 


(18) 
(20) 
(24 


Size 
4 


~ 


Field Name 
ERRADDR 


VERBGN 
VERBEND 


KYWDBGN 


KYWDEND 


DELIMCD 


WORK! 
SIX 
LINECNT 
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Description 


Address of current error routine to receive 
control if a read error occurs. 

Address of verb in current contro] statement. 
Address of first character following verb in 
current control statement. 

For PRINT control statement only, address of 
keyword. 

For PRINT control statement only, address of 
first character following keyword. 

Code Delimiter: 

X‘04’ Comma. 

X‘08’ Equal sign. 

X‘OC’ Blank. 

X‘10’ Left parenthesis. 

X‘14 Right parenthesis. 

Doubleword work area. 

Fullword constant: 6. 

Current line number, used to determine when a 
new page is needed. 
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Offset 
40 


48 
52 


56 
60 


68 


72 


76 


80 


84 


86 
88 
90 
92 
94 
96 
98 
100 
102 
104 
106 
108 


110 


112 
113 


114 
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(28) 
(2C) 


(30) 
(34) 


(38) 
(3C) 


(44) 


(48) 


(4C) 


(50) 


(54) 


(56) 
(58) 
(SA) 
(SC) 
(SE) 
(60) 
(62) 
(64) 
(66) 
(68) 
(6A) 
(6C) 


(6E) 


(70) 
(71) 


(72) 


Size 


pp 


NNN NN NNN NN ND BO 


Field Name 


PAGENUMB 
CURBUF 


TCBLIST 
CVTADDR 


PCBPTR 
INDD 


RDENTRY 


READNO 


RDERCNT 


READTM 


FILESEQ 


ONEA 
TWO 
THREE 
FOUR 
FIVE 
SEVEN 
EIGHT 
TEN 
ELEVEN 
TWELVE 
SIXTEEN 
LINENUMB 


LINENUM 


RETCODE 
SWA 
SYSUTISW 
SYSUT2SW 
OPSSW 
NOTPAGES 


GOSW 
DDSW 
SETCVTSW 


RDRSW 


SWB 
IOERR 


FMTERR 
PRTSUM 
ENDSW 
QSYSUT2 
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Description 

Current page number in binary. 

Address of current output buffer supplied by 
AMDPRWTR. 

Origin of TCB list. 

Address of CVT in dump system, obtained from 
the dump system or from the CVT control 
statement. 

Origin of PCB queue. 

DDNAME of input data set DD statement, set 
by the NEWDUMfP control statement or 
default of TAPE. 

Count of DATA entries to module 
AMDPRRDC, printed as summary information 
at AMDPRDMP termination. 

Number of blocks read from SYSUT1 work 
data set or dump tape, printed as summary 
information at AMDPRDMP termination. 
Number of I/O errors while attempting to read 
from SYSUT1 work data set or dump tape, 
printed as summary information at 
AMDPRDMP termination. 

Number of times data requested was not in an 
input buffer, printed as summary information at 
AMDPRDMP termination. 

Value of FILESEQ parameter in NEWDUMP 
contro] statement, used to open the input tape 
to the correct file. 

Constant: 1. 

Constant: 
Constant: 
Constant: 
Constant: 
Constant: 
Constant: 8. 

Constant: 10. 

Constant: 11. 

Constant: 12. 

Constant: 16. 

Value of LINECNT parameter in PARM field 
of EXEC statement or default of 58. 

Value of LINENUMB minus 2. (The number 
of lines per page excluding the title). 

Return code for PRDMP step. 

Switches: 

SYSUT1 data set specified. 

SYSUT2 data set specified. 

Operands buffering in process. 

Title pages are not to be repeated after ‘CVT =’ 
control statement. 

GO control statement being processed. 
SYSPRINT DD statement specified. 
CVTADDR field in COM has been filled by 
CVT control statement. 

Control statements entered from the SYSIN 
data set: otherwise, from the console. 

Switches: 

I/O error while reading from SYSUT1 or dump 
tape. 

Requested information not in input data set. 
SUMMARY called from PRINT. 

Reserved. 

END control statement being processed. 
SYSUT2 data set specified. 

Reserved. 


aS 
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Offset Size 
115 (73) 1 
1 
ie 
tale 
| 
116 (74) 1 
les 
XX. 
| 
117. = (75) 1 
| ee 
Ay ae 
xh 
L333 
dacs XXX 
118 (76) 1 
| Gre 
Som 
el. 
lex 
XS; 
celts 
119 (77) 1 
XXXX XX.. 
eli 
or| 
120 (78) 1 
Le: 
Pi ew 
aX 
| 
| Pee 
ie 
121 (79) 1 


122° (7A) 3 
125 (7D) 81 
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Field Name 


. XX 


rep, 4 


STOPSW 
RESPC 
TITLESW 
BUILDMAP 


SWF 
QPRDINIT 


QSADMP 
DMPIC 
PAGEOK 


QUTILOD 


BUFSW 


PREFM 
SUMFSRSW 


PRSW 


QSEGTBSW 


TTLSW 


PRNTRL 
PRNTREAL 


INDEXSW 


WTORMSG 


Description 


SWC Switches: 

MSTRSW AMDPRMST has attempted dump 
initialization. 

SETFLSH Set FLSHMODE in SWD if error 
occurs. 

POSITSW Positioning of the input data set 
must be performed. When the main error 
handler in AMDPRCTL is entered and this 
switch is on, an error occurred in input data set 
positioning. 

TREADIN INDD data set on direct access. 
EDITSW EDIT control statement being 
processed. 

SEGRD EDIT Module indication to loader 
module to issue an initialization read. 

---- Reserved. 

SWD Switches: 

FLSHMODE Control statements are being 
scanned for syntax errors only. 

---- Reserved. 

NOSTDMG Do not issue message AMD 161I 
before servicing caller’s request. 
NOLOADSW Another control statement 
appeared before END control statement. 
CONTSW Obtain continuation statement for 
EDIt control statement. 

GPRSFND Issue CPUSTATUS BRREAD to 
print general register contents in output listing. 
---- Reserved. 

SWE Switches: 

Stop option specified. 

Reserved. 

Respecify EDIT options 

Title option specified. 

AMDPRLOD or AMDPREAD must scan 
dump to build map(s). 

Reserved. 

Switches: 

AMDPREAD must be specified. 

Reserved. 

Input is from AMDSADMP. 

Complete dump contained in buffers. 

Switch for AMDPRFCB. 

Reserved. 

SYSUT1 is preloaded. 

Reserved. 

Switches: 

Reserved. 

Preformatted dump tape being processed. 
Communicate AMDPRSUM and 
AMDPRFSR. 

Switch. 

Switches: 

Initialize exit interface for mainline print dump 
request. 

Segment table origin supplied by user in 
SEGTAB control statement. 

Reserved. 

SVC dump header record has been printed in 
PRINTER output data set. 

PRINT REAL is current control statement. 
Real storage data requested. 

Reserved. 

Dump index switch. 

Reserved. 

Control statement input area. 
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Offset 


206 
214 
219 
223 
249 


(CE) 
(D6) 
(DB) 
(DF) 
(F9) 


Size 


8 
5 
4 
26 
26 


Field Name 


BLANKS 
TITLE 
STOP 
MSG1 
MSG2 
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Description 

Character string constant blanks. 
Character string constant: “TITLE”. 
Character string constant: “STOP”. 
ID and skeleton of message AMD1611. 
ID and skeleton of message AMD158I. 


The following nine fields (to offset X‘18F’) define the AMDPRDMP page title. 


Offset 


275 
339 
340 


355 
356 


369 
37] 


384 
386 
399 
655 


911 


974 


984 


1240 


1496 


1752 


1756 


1760 


1764 


1768 


1772 
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(113) 
(153) 
(154) 


(163) 
(164) 


(171) 
(173) 


(180) 
(182) 
(18F) 
(28F) 


(38F) 


(3CE) 


(3D8) 


(4D8) 
(5D8) 
(6D8) 
(6DC) 
(6E0) 
(6E4) 
(6E8) 


{oEC) 


13 
256 


256 


63 


10 


256 


256 


256 


Field Name 
TITLEMSG 


TITLEMOD 


TITLEDTE 


TITLETME 


TITLEPGE 
CAPTABL 


TABLE 


HEXTABL 


EBCTABL 


BLNK 


NONBLNK 


NONBLANK 


AWRITE 


APRTMSG 


ASYNTAX 


AFMTLINE 


AADRCNVT 


AWRDCNVT 


Description 


Title area for user-supplied title. 

One blank. 

Label and field for module name from dump 
data set header record. 

One blank. 

Label and field for data on which dump was 
taken. 

Two blanks. 

Label and field for time at which dump was 
taken. 

Two blanks. 

Label and field for page number. 

Translate table for translating EBCDIC lower 
case to upper case. 

Translate table to form EBCDIC printout at 
right margin of general format. 

Translate table for first stage of conversion of 
binary to hexadecimal characters. Note: 
TABLE, HEXTABL, and EBCTABL overlap to 
save space. 

Translate table for second stage of conversion 
of binary to hexadecimal] characters. Note: 
TABLE, HEXTABL, and EBCTABL overlap to 
Save space. 

Main scan table. This translate table associates 
the following codes with stopping characters: 
Code Delimiter 

X‘04’ Comma 

X‘08’ Equal sign 

X‘0C’ Blank 

X‘10’ Left parenthesis 

X‘14 Right parenthesis 

Table for nonblank character scan. This table 
recognizes only alphanumerics as nonblank. 
Table for nonblank character scan. This table 
recognizes everything except X‘40’ as nonblank. 
Address of PRINTER data set write routine, 
AMDPRWTR. 

Address of SYSPRINT data set write routine, 
AMDPRMSG. 

Address of message writer routine, 
AMDPRSYN. 

Address of general format routine, 
AMDPRGFR. 

Address of 3-byte binary to hexadecimal 
conversion routine in CSECT AMDPRSYN. 
Address of 4-byte binary to hexadecimal 
conversion routine in CSECT AMDPRSYN. 
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Offset 
1776 


1780 


1784 


1788 
1792 
1796 
1800 
1804 
1808 


1812 


1816 


1820 


1824 


1828 


1832 


1836 


1840 


1844 
1848 
1848 
1852 
1856 
1860 
1864 
1868 
1868 


1869 
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(6F0) 


(6F4) 


(6F8) 


(6FC) 
(700) 
(704) 
(708) 
(70C) 
(710) 


(714) 


(718) 


(71C) 


(720) 


(724) 


(728) 


(72C) 


(730) 


(734) 
(738) 
(738) 
(73C) 
(740) 
(744) 
(748) 
(74C) 
(74C) 


(74D) 


Size 


wo 
b 


—-— SPADA RAA 


La 


Field Name 
ARGNBND 


STOPEXIT 


SYNMSGA 


AEREXIT 
ALOADER 
QATMERTN 
ATCBSAVE 
ATCVREMV 
ATCBRTRV 


APCBENQ 


ASTPROUT 


AFORMAT 


APRTSTG 


BUFSUM 


BUFREINT 


AEND 


ONGOOPTR 


DCBADDRS 
AOUTDCB 
ANDXDC3 
APTRDCB 
ARDRDCB 
AINDCB 


ENDLIST 


ASYSUDCB 


Description 


Address of AMDPRFUB, valid only when the 
following control statements are being 
processed: 


PRINT ALL. 
PRINT CURRENT. 
PRINT JOBNAME. 


Address of current stop-exit routine. This 
routine is invoked if the STOP option of 
AMDPRDM*P is in effect and the operator 
replies ‘STOP’ to message AMD 156I. 

Address of message address list which contains 
messages that can be issued by calling 
AMDPRSYN at each of its entry points. 
Address of AMDPRDMfFP termination routine, 
AMDPRXIT. 

Address of AMDPRSEG. 

Address of TODCNVRT in AMDPRSEG. 
Address of TCB list enqueue routine in CSECT 
AMDPRTSV of AMDPRCOM. 

Address of TCB list dequeue routine in CSECT 
AMDPRTSV in AMDPRCOM. 

Address of TCB list element retrieve routine in 
CSECT AMDPRTSV of AMDPRCOM. 
Address of PCB queue enqueue routine, valid 
only when the PRINT with all keywords control 
statements are being processed. 

Address of STOP option handler. CSECT 
AMDPRSTP in AMDPRCOM. 

Address of AMDPRFSR, valid only when the 
following control statements are being 
processed. 


FORMAT. 
PRINT CURRENT. 
PRINT JOBNAME. 


Address of AMdPRDPS, valid only when the 
PRINT or CPUDATA control statements are 
being processed. 

Total number of dump data set buffers used 
during this execution of AMDPRDMP. 
Number of times dump data set buffers have 
been initialized during this execution of 
AMDPRDMP. 

Address of END control statement processing 
routine AMDPREND. 

Address of operands specified in the ONGO 
control statement, used by the GO verb to 
determine the functions to be performed. 
Reserved. 

Origin of AMDPRDMP DCB adaress array. 
Address of PRINTER data set DCB. 
Address of INDEX data set DCB. 

Address of SYSPRINT data set DCB. 
Address of SYSIN data set of DCB. 

Address of input data set DCB. 

Alignment. 


Constant X‘80’ to indicate end of DCB address 
array. 
Address of SYSUT1 or SYSUT2 data set DCB. 
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The following four fields (to offset X‘75D’) are used only for the EDIT function 
of AMDPRDMP. These fields are valid only when the EDIT control statement is 
being processed. 


Offset 
1872 (750) 


1876 (754) 
1880 (758) 
1884 (75C) 


1885 (75D) 


Size 
4 


3 


Field Name 
TRCCOUNT 


AEDITCB 


AROOT 


EDITER 


Additions for release one support. 


Offset 


1888 (760) 
1892 (764) 
1896 (768) 
1900 (76C) 


Field Name 


REALMAP 
SEGTABOR 
REALMAX 
QAPFT 


Additions for release one support. 


Offset 
1904 (770) 


1906 (772) 


1908 (774) 
1912 (778) 


1916 (77C) 


1920 (780) 
1924 (784) 


2092 (82C) 
2192 (890) 
2196 (894) 
2200 (898) 


2204 (89C) 


2208 (8A0) 
2212 (8A4) 
2216 (8A8) 
2220 (8AC) 
2224 (8B0) 
2228 (8B4) 
2232 (8B8) 
2236 (8BC) 
2240 (8C0) 


2244 (8C4) 


2246 (8C6) 
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Size 
2 


2 


> & 


4 
168 


& a — 


fo Lh HSE HS > 


te 


Field Name 
QASID 


IPLCPU 


CURASCB 
PREFXRGR 


PREFXRGV 


ASVTADDR 
HDRREGS 


HDRTITLE 
ASIDNDX 
CPUMAP 
ASCBMAP 


BUFERMAP 


BRRDDATA 
BRRDINIT 
BRRDADJ 
AASCBFMT 
ASRBFMT 
AUSRINIT 
AUSREXIT 
AUSRDEL 
AUSRTCBA 


AUSRASID 


EXITFLAG 


Description 

Number of GTF trace records processed, i.e., 
the number of entries to module AMDPRGET. 
Address of the EDIT communications area 
AMDPRTAB. 

Address of AMDPRTAB initialization routine 
AMDPROOT. 

Value of EDIT ER = parameter from 
AMDPRDMP EXEC statement. 

Alignment. 


Description 


Address of real storage dump map. 
Segment table origin. 

Address of the top of real] storage. 
Address of page frame table. 


Description 

ASID of IPLed CPU for SADMP; home ASID 
for SVC dump. 

Address of IPLed CPU. Contains 256 if CPU 
status was unavailable; that is, an ]/O error 
occurred while reading the CPUSTATUS 
record. 

Address of current ASCB in dumped system. 
Real address in PSA prefix register (SADMP 
input only). 

Virtual address in PSA prefix register (SADMP 
input only.) 

Address of ASVT in dumped system. 

Registers and current PSW from SVC Dump or 
DSS header record. 

Title from dump header record. 

Address of ASID index. 

Address of CPU STATUS record maps. 
Address of ASCB map created by 
AMDPRRDC. 

Address of first physical buffer map entry in 
AMDPRRDC. 

Address of AMDPRRDC data read routine. 
Address of AMDPRRDC INIT routine. 
Address of BRREAD ADJUST routine. 
Address of AMDPRFAR. 

Address of AMDPRSRB. 

Address of AMDPRUIM initialization routine. 
Address of user-exit interface routine. 

Entry point of AMDPRUIM clean-up routine. 
Address of TCB currently being processed by 
AMDPRESR. 

ASID of address space being processed by 
AMDPRFAR or AMDPRFSR. 

Flags indicating action to be performed by 
AMDPRUIM. 
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The following offsets are used in the IBM 3800 printing subsystem: 


Offset 
2247 (8C7) 


2248 (8C8) 
2250 (8CA) 
2252 (8CC) 
2254 (8CE) 
2255 (8D0) 
2258 (8D2) 
2260 (8D4) 
2262 (8D6) 
2264 (8D8) 


2268 (8DC) 


2272 (8E0) 


2272 (8E0) 
2284 (8EC) 
2288 (8FO) 
2300 (8FC) 
2304 (900) 
2304 (900) 
2304 (900) 
2306 (902) 
2308 (904) 
2310 (906) 


2312 (908) 
2312 (908) 
2316 (90C) 
2320 (910) 
2324 (914) 
2328 (918) 
2336 (920) 


2337 (921) 
2340 (924) 


2344 (928) 
2520 (9D8) 
2520 (9D8) 


2524 (9DC) 


2528 (9E0) 
2532 (9E4) 
2536 (9E8) 
2540 (9EC) 
2544 (9FO) 


2548 (9F4) 


Size 
1 


NNN NN 
fo 5) 


—e coh fh ff — 


& WwW: 


200 
16 


hb Pah A HH 


ph jam 
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Field Name 
13800SW 


I3800KEY 


I13800ULN 
1380080 


13800204 
RBMAX 
LLEMAX 
JPQMAX 
DEBMAX 
DDMAX 
SRBMAX 
TCBMAX 
ASCBMAX 
XLMAX 
LPAMAX 
TITLEKEY 


TITLESTK 
ZIERRID 
APRSTK 
CMINFO 
CMASID 
CMHASID 
CMPASID 
CMSASID 
CMCASID 


CMASCB 
CMHASCB 
CMPASCB 
CMSASCB 
CMCASCB 
CMPSW 
CMCFLGS 
CMDFTCUR 


CMNUMPCB 


COMSRES 
PDCPPL 
PDCBUF 
PDCUPT 
PDPSCB 
PDPECT 
ABDPLADR 
SRAADR 
COMTRCE 


PDSW 
PSLITERM 
PSQASPIL 
POVERLAP 


PGDAERSW 
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Description 


Switches: 

Reserved. 

Indicates storage key message will be printed in 
page title. 

User specified line count. 

Print 80 lines per page, subject to user specified 
line count. 

Print double density line for storage dump. 
Maximum number of RBs allowed (50). 
Maximum: number of LLEs allowed (255). 
Maximum number of PQEs (256). 

Maximum number of DEBs (200). 

Maximum number of DDs (1635). 

Maximum number of SRBs (50). 

Maximum number of TCBs (256). 

Maximum number of ASCBs (200). 

Maximum number of extent lists (25). 
Maximum number of CDE elements (500). 
Label and field for key or storage data currently 
being dumped. 

Reserved for alignment. 

Storage key value. 

Stored from the SVC dump. 

Address of the STKE formatter. 

Information about cross memory environment. 
Current ASIDs. 

ASID of the HOME address space. 

ASID of the PRIMARY address space. 

ASID of the SECONDARY address space. 
ASID of the CML (cross memory lock) address 
space. 

Current ASCBs. 

ASCB pointer to the HOME address space. 
ASCB pointer to the PRIMARY address space. 
ASCB pointer to the SECONDARY address space. 
ASCB pointer to the CML address space. 

PSW passed from SVCDUMP and SYSMDUMP. 
Flags needed by AMDPRCMC. 

Above ASID and ASCB fields should not be used 
by PRINT CURRENT and PRINT 
STORAGE verbs. 

Reserved. 

Alignment. 

The number of PCBs to be processed and passed 
from AMDPRPMS to AMDPRDPS. 

Reserved. 

TSO CPPL. 

Address of TSO command buffer. 

Address of TSO UPT. 

Address of TSO PSCB. 

Address of TSO ECT. 

Address of TSO ABDPL. 

Address of Service Router Area, (SRA). 
Anchor for the Console-Initiated Loop Recording 
routine. 

Switches: 

AMDPRDMP processing must terminate. 

The SQA has spilled into the CSA. 

The storage ranges overlap when enqueuing 
PCBs. 

The GDA is unavailable. 

Reserved. 
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Offset 


2549 
2550 
2552 
2552 
2552 
2556 
2560 
2560 
2564 
2568 
2568 
2572 
2576 
2576 
2580 
2584 
2584 
2588 
2592 
2592 
2596 
2600 
2600 
2604 


(9F5) 
(9F6) 
(9F8) 
(9F8) 
(9F8) 
(9FC) 
(A00) 
(A00) 
(A04) 
(A08) 
(A08) 
(A0C) 
(A10) 
(A10) 
(A14) 
(A18) 
(A18) 
(AIC) 
(A20) 
(A20) 
(A24) 
(A28) 
(A28) 
(A2C) 


A) 
i= 
& 


bw 
bh 


PPC RAMWBRAMDARAORAOBRAOBRRO— NK 


Field Name 


FBQEMAX 
PSLIDTA 
PCSADINF 
PCSADDR 
PCSAEADR 
PCSZINFO 
PCSASZ 
PCSAESZ 
PSQADINF 
PSQADDR 
PSQAEADR 
PSQZINFO 
PSQASZ 
PSQAESZ 
PRIADINF 
PRIADDR 
PRIEADR 
PRITAINF 
PRITADDR 
PRITEADR 
PRISZINF 
PRISZ 
PRIESZ 
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Description 

Reserved. 

Maximum number of FBQEs (100). 
Data initialized by AMDPRSLI. 
CSA Starting addresses. 
Non-extended CSA starting address. 
Extended CSA starting address. 
CSA Size information. 
Non-extended CSA size. 

Extended CSA size. 

SQA starting address. 
Non-extended SQA starting address. 
Extended SQA starting address. 
SQA size information. 
Non-extended SQA size. 

Extended SQA size. 

Private starting address. 
Non-extended private starting address. 
Extended private starting address. 
Private ending addresses. 
Non-extended private ending address. 
Extended private ending address. 
Private size information. 
Non-extended private size. 

Extended private size. 


The following represents the address of the GDA fields for which BRREADS 
were attempted. The address of the GDA fields is used in an output comment 


when a read error occurs. 


Offset 


2608 
2608 


2612 


2616 
2616 


2620 
2624 
2624 


2628 


2632 
2632 


2636 
2640 
2644 
2648 
2652 
2656 
2660 
2664 
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(A30) 
(A30) 


(A34) 


(A38) 
(A38) 


(A3C) 
(A40) 
(A40) 


(A44) 


(A48) 
(A48) 


(A4C) 
(A50) 
(A54) 
(A58) 
(ASC) 


(A60), 


(A64) 
(A68) 


Size 


8 
4 


ho 


Field Name 


PCSERRAD 
PRDCSAD 


PRDCSADE 


PCSERRSZ 
PRDCSASZ 


PRDCSZE 
PSQERRAD 
PRDSQAD 


PRDSQADE 


PSQERRSZ 
PRDSQASZ 


PRDSQSZE 
PNUCLBND 
PNUCTOP 
PNUCRLBD 
PNUCRTOP 
PDFLTNCL 
PDFLTNCT 
PAQATNDX 


Description 

Address of GDA fields for CSA addresses. 
Address of GDA field for non-extended CSA 
addresses. 

Address of GDA field for extended CSA 
starting address. 

Address of GDA fields for CSA size. 
Address of GDA field for non-extended CSA 
size. 

Address of GDA field for extended CSA size. 
Addresses of GDA fields for SQA addresses. 
Address of GDA field for non-extended SQA 
Starting address. 

Address of GDA field for extended SQA 
Starting address. 

Address of GDA fields for SQA size. 
Address of GDA field for non-extended SQA 
size. 

Address of GDA field for extended SQA size. 
Lowest DAT-on nucleus address. 

Highest DAT-on nucleus address. 

Lowest DAT-off nucleus address. 

Highest DAT-off nucleus address. 

Default for lowest DAT-on nucleus address. 
Default for highest DAT-on nucleus address. 
Pointers to the SQA AQAT index tables for 
subpools 226, 239, and 245. 
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Offset Size Field Name Description 

2264 (A68) 4 PAQNDX26 Pointer to the subpool 226 AQAT index table. 

2268 (A6C) 4 PAQNDX39 Pointer to the subpool 239 AQAT index table. 

2272 (A70) 4 PAQNDX45 Pointer to the subpool 245 AQAT index table. 

2676 (A74) 15 TOPHDR Print storage heading. 

2691 (A83) 1 ---- Alignment. 

2692 (A84) 20 PSLIDTAI1 Data initialized by AMDPRSLI. 

2692 (A84) 4 PMAXCOME Maximum ending address of extended common 
area when comparing the end of the extended 
FLPA, MLPA, PLPA, CSA, and SQA. 

2969 (A88) 4 PSMAD Start of the non-FREEMAINable storage 
management area. 

2700 (A8C) 4 PSMSZ Size of the non-FREEMAINable storage 
management area. 

2704 (A90) 4 PPGTAD Start of the non-FREEMAINable page table 
area. 

2708 (A94) 4 PPGTSZ Size of the non-FREEMAINable page table 
area. 

2712 (A98) 4 COMHDR Pointer to a copy of the dump data set header 
record. 

2716 (A9C) 44 COMDSNM Work file data set name from AMDPRLOD. 

2760 (AC8) 4 COMPRFOR Address of entry in AMDPRFOR to be used by 


AMDPRFXT during format verb processing. 


The following field is an addition for 4K read support. 


Offset 


Size 


Field Name 
COM4K BUF 


Description 
Address of 4K buffer used in 4K BRREAD. 


2764 (ACC) 4 


The following two fields are additions for input record continuation support. 


Offset Size Field Name Description 
2768 (ADO) 4 COMOPLN Length of operands list. 
2772 (AD4) 4 COMOPPTR Pointer to operands list. 


The following six fields (to offset X‘AEB’) are used for AMDPRDMP index 


support. 

Offset Size Field Name Description 

2776 (AD8) 4 COMINDXA Address of index entry. 

2780 (ADC) 1 COMINDEX Entry code. 

2781 (ADD) 1 COMINDXL Index level. 

2782 (ADE) 2 COMXASID Insertion data for index. 

2784 (AEO) 4 COMNDXEP Entry point for AMDPRNDx, the dump index 
service routine. 

2788 (AE4) 4 INDXLCNT Index line count work area. 

2792 (AE8) 4 VIRTMAX Highest virtual address. This field is set by 
AMDPRSLI from CVTMZ00, if it can be read 
from the dump. 

2796 (AEC) 16 PDIOPL TSO IOPL. 

2796 (AEC) 4 PDIUPT Address of TSO UPT. 

2800 (AFO) 4 PDIECT Address of TSO ECT. 

2804 (AF4) 4 PDIECB Address of ECB. 

2808 (AF8) 4 PDIIOPBP Address of I/O parameter block. 
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CPU Status Area ) 
Size: 192 bytes. 
Created by: AMDPRRDC. 


Use: A BRREAD request for CPU status will result in this area being created 
from the input dump header record or CPU status records. The IHAABDLP 
macro contains mapping for this information. 


Offset Size Field Name Description 


0 (0) l AMDCFLAG 
legs thy CPU is a uniprocessor: CPU address is invalid. 
Moe, ° Gade SADMP unable to perform store status; only 
CPU address is valid. 


als. cee Operator did not perform store status; only 
general registers and, if MP, CPU address are 
valid. 
re | see Non-SADMP input, only registers/PSW are valid. 
ae XXXX Reserved. 
l (1) l Reserved. 
2 (2) 2 AMDCPADR CPU address. 
4 (4) 32 AMDCFREG Floating point registers 0-6. 
46 (24) 64 AMDCGREG General purpose registers 0-15. 
100 = (64) 64 AMDCCREG Control registers 0-15. 
164 (A4) 8 AMDCCPSW Current PSW. 
172 (AC) 4 AMDCPREG Prefix register value. 
176 ~=(BO) 8 AMDCTIME CPU timer value. 
Note: This is not location 80 time or 
TOD clock. 
184 (88) 8 AMDCLOCK Clock comparator value. 





Current TCB List (CURRLIST) 
Size: 192 bytes. 
Created by: AMDPRSUM. 


Use: SUMMARY control statement uses this data area for storing information 
for the processor that is not in SRB mode. 


Offset Size Field Name Description 

0 (0) CURENTRY List entries —one for each current TCB found 
in the dump. 

0 (0) 2 CURCPUID CPU identifier for this entry. 

2 (2) 2 ---- Reserved. 

4 (4) 4 CURTCBA TCB address for this entry. 

8 (8) 4 CURASCA ASCB address for this entry. 


Dump Header Record 


The Dump Header Record is descnbed in the Debugging Handbook. 





3-72 MVS/Extended Architecture Service Aids Logic LY28-1189-2 © Copyright IBM Corp. 1982 1985 


C 


Contains Restricted Materials of IBM 
Licensed Materials — Property of IBM 


Dump Map Entry 
Size: 16 bytes. 
Created by: AMDPRREAD and AMDPRLOD. 
Updated by: None. 


Use: One dump map entry is built for each block of records in the input dump 
data set. The dump map eliminates searching the data for a requested record. 


Offset Size Field Name Description 

0 (0) 4 DUMPLINK Address of next entry in this map. 

4 (4) 4 DUMPFADD Address of the first byte of the first record in 
the block of records represented by this entry. 

8 (8) 4 DUMPLADD Address of the first byte of the last record in the 
block of records represented by this entry. 

12 (C) 4 DUMPTTR TTR or block number (tape input) in the input 


data set of the first record in the block of 
records represented by this entry. 


EDIT Communication Table (AMDPRTAB) 
Size: 536 bytes. 
Created by: AMDPROOT. 
Updated by: AMDPRSCN, AMDPROOT, AMDPRSN2, AMDPRSN3, 
AMDPRGET, AMDPRREC, AMDPRFLT, AMDPRFRM, AMDPREXT, 
AMDPRAPP, AMDSYS07. 


Use: Communication among AMDPRDMP modules that execute the EDIT 


function. 
Offset Size Field Name Description 
0 (0) 4 AFMG Address of AMDPRFMG message CSECT in 
AMDPRXED. 
4 (4) 4 CURREC Address of current input record. 
8 (8) 12 DEBGFLGS Debug flags: 
8 (8) l PTHFLGS1 Flags indicating routine in execution: 
| ae ROOT AMDPROOT. 
fi eer SCN AMDPRSCN. 
rer GET AMDPRGET. 
ls tas CON AMDPRGET. 
ire HEX AMDPRCON. 
als FLT AMDPRFLT. 
wl. FRM AMDPRFRM. 
fees eal REXT AMDPREXT. 
9 (9) I PTHFLGS2 Flags indicating routine in execution: 
Bit Routine 
APP 0 AMDPRAPP. 


1-7 Reserved. 
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Offset 


12 
20 


24 
32 


40 
48 
50 
52 
52 
60 
62 


104 


124 


125 
128 
288 


229 
232 
332 


333 
336 
368 


369 
372 
4$2 


453 
456 
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(A) 


(B) 


(C) 
(14) 


(18) 
(20) 
(28) 
(28) 
(30) 
(32) 
(34) 
(34) 
GC) 
(3E) 
(40) 
(68) 


(7C) 


(7D) 
(80) 
(E4) 


(E5) 
(E8) 
(14C) 


(14D) 
(150) 
(170) 


(171) 
(144) 
(1C4) 


(1C5) 
(1C8) 


were GOKMReOHe@ 
S bho bho 


—_, 


«XXX 


AXXX 


AXAAXX 


Field Name 


INRFCFGS 
FLMODE 
TERM 
SPIE 

FMT 


RET 
EXTTRC 
EDITSTOP 
DMDFMT 


IOFLGS 
GETEOF 


GTFWDPTR 


USEREXIT 
DDNAME 
STARTIME 
TIME 

D 

DAY 
STOPTIME 
TIME2 

F 

DAY2 
JOBNAMES 
ASCBADDR 


SIOFLGS 
ALLS 
SELS 
EQUIV 
NOEQU 
CCWS 


SIODVADS 
IOFLGS2 
ALLI 

SELI 

CCW! 


IODVADS 
SVCFLGS 
ALLV 
SELV 


SVCNUMS 
USRFLGS 
ALLU 
SELU 


USRNGTAB 
PIFLGS 
ALLP 

SELP 


Reserved. 
PICODES 
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Description 


Interface flags: 

Flush mode. 

Termination requested. 

SPIE routine. 

Formatting of input record requesting by user exit 
routine. 

Indent output (used by AMdPRAPP). 
External data set being processed. 

Stop in progress. 

Unconditional formatting requested by user 
exit routine. 

I/O flags: 

End-of-file. 

Reserved. 

Reserved. 

Address of GTF option word, extracted from 
time stamp record. 

User exit name, in EBCDIC. 
DDNAME keyword value in EBCDIC. 
Start time value: 

Timer units. 

Zeros and year. 

Julian day. 

Stop time value 

Timer units. 

Zeros and year. 

Julian day. 

Maximum of five jobnames in EBCDIC. 
Maximum of five ASCB addresses in 
hexadecimal. 

SSCH selectivity flags: 

EDIT all SSCH records. 

EDIT selective SSCH records. 

SSCH = IO. 

SSCH may not equal IO. 

Edit CCW records for SSCH events. 
Reserved. 

Reserved. 

Maximum of fifty SSCH device addresses. 
I/O selectivity flags: 

EDIT all I/O records. 

EDIT selective I/O records. 

EDIT CCW records for IO events. 
Reserved. 

Reserved. 

Maximum of 50 I/O device addresses. 
SVC selectivity flags: 

EDIT all SVC records. 

EDIT selective SVC records. 

Reserved. 

Reserved. 

SVC bit string: one bit for each SVC number. 
User selectivity flags: 

EDIT all user records. 

EDIT selective user records. 

Reserved. 

Reserved. 

Maximum of 20 user EID ranges. 

PI selectivity flags: 

EDIT all PI records. 

EDIT selective PI records. 

Reserved. 


PI bit string: one bit for each PI code. 
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Offset Size 
488 (1E8) ] 


489 = (IE9) ] 


490 (IEA) 3 


493 (IED) 3 
496 (IFO) 8 
504. (1F8) 4 
508 (IFC) 4 
512. (200) 4 
516 (204) 4 
520 (208) 4 
524. (20C) 2 
526 (20E) 2 
528 (210) 4 
532 (214) 9 
532 (214) 33 
535. (217) 2 
537 (219) 2 
539 (21B) 2 
541 (21D) 9 
541. (21D) 3 
544 (220) 2 
546 (222) 2 
548 (224) 2 
550 (226) 4 
554 (22A) 8 
562 (232) 
563. (233) 1 
564 (234) 4 
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Field Name 


GENFLAGS 
EXT 

DSP 

SYS 

SYSM 
RNIO 

SRM 

RR 

EOF 
GENFLGS|]1 
TS 
EOFINPRO 
TSFOUND 
FIRSTHSW 
SLIPPERM 
CPUSEL 


RECDLL 
EXITNM 


EXITADDR 


AEIOCT 
PRFMTADD 
REENTWKA 
AFRMAD 
OFSTEID 
OFSTDATA 
ADTSBUF 
ESTARTME 
ESDAY 
ESHR 
ESMIN 
ESSEC 
ESTOPTME 
ESPDAY 
ESPHR 
ESPMIN 
ESPSEC 
CVVTZONE 


CPU 


ASYO7TWA 
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Description 


General flags: 

EDIT external interruption. 

EDIT dispatcher event records. 

EDIT GTF comprehensive trace records. 
EDIT GTF minimal trace records. 
EDIT RNIO trace records. 

EDIT SRM trace records. 

EDIT RR trace records. 

End-of-file exit in effect. 

General flags: 

Time stamp needed. 

End of file in progress. 

Time stamp found. 

Hexadecimal dump first time. 

EDIT SLIP records. 

CPU selection in effect. 

Reserved. 

Reserved. 

Record length. 

Name of user exit routine or format appendage 
currently in control. 

User exit routine or format appendage entry 
point address. 

Address of EDIT I/O control table. 
Address of AMDPRFMT. 

Address of workarea. 

Address of AMDPRFRM address table. 
Offset of EID in trace record. 

Offset of data in trace record. 

Address of timestamp record buffer. 
Start time save area. 

Day. 

Hour. 

Minutes. 

Seconds. 

Stop time save area. 

Day. 

Hour. 

Minutes. 

Seconds. 

CVT time-zone value. 

Reserved. 

CPU for select. 

Reserved. 

Address of work area for CCW format 
appendage. 
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Exit Control Table (ECT) 
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Size: Variable. The user may use the linkage editor to expand the table. 


Created by: The ECT is in SYSi.LINKLIB as CS9ECT AMDPRECT in load 


module AMDPRECT. 


Updated by: The user updates the ECT entries using the AMASPZAP service aid 
program. The ECT has at least five available unused entries. 


Use: One twenty-byte entry exists for each user-exit module. AMDPRUIM scans 
the ECT to determine when user-exit modules should receive control. The 


IHAECTE macro maps an ECT entry. 


Offset Size 
0 (0) 8 

l 

l 


Field Name 


ECTEMODN 
EXTEEXIT 
ee EXTEEXTC 
sere ECTEEXAS 
7 re ECTEEXFT 
oe reer ECTEEXPC 
1... ECTEEXNU 
l.. ECTEXHD 


8 (8) 


rer ECTEIFSA 


XXX -XXXX ---- 
10 (A) 2 ECTERSRV 
12 (C) 8 ECTEVERB 


Path Descriptor Element 


Size: 4 bytes. 
Created by: AMDPRCTL. 


Updated by: AMDPRCTL. 


Description 

Exit module name. 

Calling flags. 

TCB exit. 

ASCB exit. 

FORMAT exit. 

PRINT CURRENT/JOBNAME exit. 

PRINT NUCLEUS exit. 

Header exit. 

Reserved. 

ECTEIFAT Interface attributes. 

The PRDMP access storage service must treat 
the virtual address input parameter passed to it 
in register 0 as a 24-bit value when it is invoked 


by this module for locations in the dump. ) 





Although this module limits its requests for 
virtual storage to locations below 16M, it does 
not guarantee that the high order byte of 
register 0 is zero. 

Reserved. 

Reserved. 

User verb name. 


Use: One for each nonresident service and executor module; describes the module 


for loading by AMDPRSEG. 


Offset Size Field Name 
0 (0) I Flags 

0... 

XXX -XXXXK 


(1) 3 


Description 


Flags: 

Service module. 

Executor module. 

Reserved 

Module ID: the unique last three characters of 
the module name. 
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Print Control Block (PCB) 
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Size: 16 bytes. 
Created by: AMDPRPCB. 
Updated by: None. 


Use: Contains the starting and ending addresses in the dump data set of storage 
areas to be printed by AMDPRDMP. 


Offset Size Field Name Description 
0 (0) 4 PCBLINK Address of next PCB. 
4 (4) 4 PCBSTART Starting address of storage to be printed. 
8 (8) 4 PCBSTOP Ending address of storage to be printed. 
12 (C) 2 PCBASID ID of address space to be printed. 
14 (3) ] Flags: 
Ve - ole Virtual storage PCB. 
5 ee Real storage PCB. 
ee Change PCBSTART value to zero. 
ee Update TOPICHDR field in COMMON. 
XXXX Reserved. 


Print Dump Index Description Table (AMDMNDXT) 


Size: Each entry is 44 bytes; the total length depends on total number of 
description entries. For each entry, there is a 4-byte table entry description word 
(EDW), and a 40-byte description data area. 


EDW — 4 bytes. 
Data — 40 bytes per each description entry. 
Created by: AMDPRCOM. 


Use: AMDMNDXT is the data area that contains the print dump index 
description table and its entry constants that are in the form of assembler EQU 
instructions. 


EDW format for each entry: 


Offset Size Field Name Description 
0 (0) 
] (1) 


Sue Reserved. 
bate Insertion data is needed. 


ee ae ee) 
. 
° 
. 


2 (2) ---- The offset in the description data where data 
is inserted. 
3 (3) l ---- Length of the insertion data. 
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The description table contains the following 40 byte long entries. The 4 byte 
EDW precedes each description entry. 





'PRINT DUMP ABSTRACT INFORMATION ........ 
'COMMUNICATION VECTOR TABLE (CVT). .......- 
‘NUCLEUS STORAGE ....... 6. 1 + we ee eae 
'DAT-ON NUCLEUS ...... . 2. 2 e 2 ee ee 
'DAT-OFF NUCLEUS .... te ke ee 
‘SYSTEM QUEUE AREA (SQA) STORAGE ........ 
'COMMON SYSTEM AREA (CSA) STORAGE ........ 
'LINK PACK AREA MAP. Coke ee ee ek ke 
'LPDE SORTED BY NAME MAP ............. 
'LPDE SORTED BY EPA MAP ........ 4.4 268-6 
'LPA ACTIVE QUEUE MAP ....... +6. 2 2 we - 
‘SYSTEM SUMMARY .. . Coe eke ee ele 
‘DUMP ADDRESS RANGES SUMMARY ........... 
‘ACTIVE CPU LIST SUMMARY .. . toa ew ee ee 
‘SCHEDULED SERVICES (SRB) SUMMARY ........ 
'JOB SUMMARY... Ck ee ee ee ek ek ee 
‘PROBLEM LIST SUMMARY ...........4.2. 
'PRINT DUMP FORMAT . . Ce ee ee ek ek ek ke 
‘SCHEDULED SERVICES (SRB) ........ ees. 
'PRINT DUMP EDIT ...... 0. ee we ew ew ew ee 
'VIRTUAL STORAGE PRINT ....... 24. + + ee 
'REAL STORAGE PRINT ... te ke ee ek ew ee 
‘PRIVATE STORAGE FOR ASID XXXX .......... 
'NON-EXTENDED COMMON STORAGE PRINT ........ 
'NUCLEUS STORAGE PRINT... Lok ke ew ee ee 
‘EXTENDED COMMON STORAGE PRINT ........ 
'CURRENT STORAGE PRINT ........++.44.. 
'JOBNAME PRINT .........+4 6.284684 
'ADDRESS SPACE XXXX CONTROL BLOCKS .... 

'TASK CONTROL BLOCK (TCB) ....... 

'PASK CONTROL BLOCK SUMMARY ........... 
'REQUEST BLOCKS (RB) .. . Cok ek ee ek ke 
‘EXTENDED STATUS BLOCKS (XSB) .......... 
"PROGRAM CALL LINK STACK (STKE) ......... 
'LOAD LIST... Con ee ew ee ee ee ew kk 
'JOB PACK QUEUE (JPQ) .. tk ee ee ee ke 
'IOS DATA EXTENT BLOCKS (DEB) .......... 
'TASK INPUT/OUTPUT TABLE (TIOT) ......... 
'CROSS MEMORY INFORMATION ..........-. 
'IOS DATA AREAS ...... 6 6 ee we ee eee 
'RTM DATA AREAS .. . toe ke ee ke 
'DATA MANAGEMENT DATA AREAS .. . Loe 
‘PROCESSOR RELATED DATA AREAS (CPUDATA) .. . 
'CONSOLE INITIATED LOOP TRACE RECORDS .... 





The Index Table Entry Code Equates List: 


Field Name Equate Description 
INDXABS AMDPRABS, PRINT DUMP ABSTRACT 


] 
INDXCVT 2 AMDPRCVT, CVT MA 
INDXNUC 3 AMDPRNUC, NUCLEUS PRINT 
INDADTN 4 AMDPRNUC, DAT-ON NUCLEUS PRINT 
INDXDTF 5 AMDPRNUC, DAT-OFF NUCLEUS PRINT 
INDXSQA 6 AMDPRNUGC, SQA PRINT 
INDXCSA 7 AMDPRNUGC, CSA PRINT 
INDXLPA 8 AMDPRLPA, LINK PACK AREA MAP INDEX TITLE 
INDXLPAI1 9 AMDPRLPA, LPDE SORTED BY EPA MAP 
INDXLPA2 10 AMDPRLPA, LPDE SORTED BY NAME MAP 
INDXALPA3 ll AMDPRLPA, LPA ACTIVE QUEUE MAP 
INDXSUM 12 BLSQSUM4, SYSTEM SUMMARY 
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TCBLIST Entry 


Field Name 


INDXSUM1 
INDXSUM2 
INDXSUM3 
INDXSUM4 
INDXSUMS5 
INDXFXT 
INDXFSRB 
INDXEDIT 
INDXVSPR 
INDXRSPR 
INDXPAID 


INDXPNEC 
INDXPNUC 
INDXPECS 
INDXPCR 
INDXPJBN 
INDXASCB 
INDXFTCB 
INDXTSUM 
INDXFRB 
INDXFXSB 
INDXSTKE 
INDXFLL 
INDXFJPQ 
INDXFDEB 
INDXTIOT 
INDXFXM 
INDXIOSD 
INDXRTMD 
INDXDMDA 
INDXCPUD 
INDXLRF 


INDXETIT 


INDXATIT 


Size: 8 bytes. 


Equate 


13 
14 


16 
17 


19 
20 


22 
23 


24 
25 
26 
27 
28 
29 
30 


32 
33 
34 
25 
36 
37 
38 
39 
40 


42 
43 
44 
254 


25° 


Description 


BLSQSUM4, DUMP ADDRESS RANGES SUMMARY 
BLSQSUM4, CPU LIST SUMMARY 

BLSQSUM4, SCHEDULED SERVICES SUMMARY 
BLSQSUM4, JOB SUMMARY 

BLSQSUM2, PROBLEM LIST SUMMARY 

BLSQSUM2, PRINT DUMP FORMAT 

BLSQSUM2, SCHEDULED SERVICES (SRB) 
AMDPRFRM, PRINT DUMP EDIT 

AMDPRPMS, VIRTUAL STORAGE PRINT 
AMDPRPMS, REAL STORAGE PRINT 

AMDPRPMS, PRIVATE STORAGE FOR ASID XXXX 
AMDPRPMS, PRIVATE STORAGE FOR ASID XXXX 
AMDPRPMS, PRIVATE STORAGE FOR ASID XXXX 
AMDPRPMS, NON-EXTENDED COMMON STORAGE PRINT 
AMDPRPMS, NUCLEUS STORAGE PRINT 
AMDPRPMS, EXTENDED COMMON STORAGE PRINT 
AMDPRPCR, PRINT CURRENT 

AMDPRPJB, PRINT JOBNAME 

BLSQSUM2, ADDR SPACE XXXX CONTROL BLOCKS 
BLSQSUM2, TASK CONTROL BLOCKS (TCB) FORMAT 
BLSQSUM2, TCB SUMMARY 

BLSQSUM2, REQUEST BLOCK (RB) 

BLSQSUM2, EXTENDED STATUS BLOCK (XSB) 
BLSQSUM2, PROGRAM CALL LINK STACK (STKE) 
BLSQSUM2, LOAD LIST 

BLSQSUM2, JOB PACK QUEUE 

BLSQSUM2, IOS DATA EXTENT BLOCKS (DEB) 
BLSQSUM2, TASK INPUT/OUTPUT TABLE (TIOT) 
AMDPRXMT, CROSS MEMORY INFORMATION 
IECIOFMT, IOS DATA AREAS 

IEAVTFMT, RTM DATA AREAS 

IECDAFMT, DATA MANAGEMENT DATA AREAS 
AMDPRGCD, PROCESSOR RELATED DATA AREAS 
AMDPRLRF, CONSOLE INITIATED LOOP TRACE 
RECORDS 

AMDPREFRM, INITIALIZATION THROUGH THE EDIT 
VERB 

AMDPRABS, INITIALIZATION DURING ABSTRACT 
PROCESSING 


Created by: CSECT AMDPRTSV in AMDPRCOM. 


Updated by: CSECT AMDPRTSV in AMDPRCOM. 


Use: Describes selected TCBs for use by subsequent routines. 


Offset 
0 (0) 
4 (4) 


Size 
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Field Name Description 


Address of next TCBLIST entry. 
Address of associated TCB. 
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Section 5: Diagnostic Aids 


This section contains the following information to aid the reader in diagnosing 
AMDPRDMF errors: 


@ AMDPRDMPF register usage. 
@ Return codes issued by AMDPRDMP modules. 


Note: Refer to System Messages for message text and detecting, issuing, and 
containing modules. 


AMDPRDMIP Register Conventions 


Symbol Register Usage 
PREG I Parameter register. 
R2 2 Parameter register in following CSECTs: 
@ CSECT AMDPRMSG in AMDPRCOM — Length of message to 
be written. 
@ CSECT AMDPRTSV in AMDPRCOM — Contents depend on 
routine: 
1. TCBQSAVE — TCB address. 
2. TCBRTRV — TCBLIST position number. 
3. TCBREMV — Address of TCB to be removed or 0 to indicate 
that all TCBs are to be dequeued. 
BUFREG 6 Base of DSECT for output line (OQUTBUFM). 
R7 7 TCB address passed to TIOT element enqueue routine in 
AMDPRFUB. 
R9 9 @ During EDIT processing, the address of the EDIT 
communication table (AMDPRTAB). 
@ During processing other than EDIT, R9 is the Jinkage register for 
internal subroutines. 
BASE] 11 Base register for aJl modules. 
COMBASE 12 Address of AMDPRDMP common communication area 
(COMMON). 
R13 13 Address of standard register save area. 
RETREG 14 Linkage register for CSECT to CSECT subroutine calls. 
R15 15 Entry point register for CSECT to CSECT subroutine calls. 


AMDPRDMP Return Codes 


Return 
Module CSECT Code Meaning 
AMDPRABS AMDPRABS 0 Header record available, valid dump type 
specified. 
8 Invalid dump type specified. 
12 Header record not available. 
AMDPRAPP AMDPRAPP None 
AMDPRCMC AMDPRCMC None 
AMDPRCOM AMDPRCOM None 
AMDPRGFR None 
AMDPRMSG None 
AMDPRNDX None 
AMDPRSTP None 
AMDPRSYN None 
AMDPRTSV 0 Successful completion of TCBLIST enqueue, 
dequeue, or retrieve operation. 
AMDPRWTR None 
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Module 
AMDPRCTL 


AMDPRCVT 


AMDPRDPS 


AMDPREAD 
AMDPRECT 
AMDPREXT 
AMDPRFAR 
AMDPRFLT 
AMDPRFMG 


AMDPRFMT 


AMDPRFOR 
AMDPRFRM 
AMDPRFSR 


AMDPRFUB 
AMDPRFXT 
AMDPRGCD 
AMDPRGET 
AMDPRGSA 


AMDPRJINA 


AMDPRLOD 


AMDPRLPA 
AMDPRLRF 
AMDPRMST 
AMDPRNUC 
AMDPROOT 
AMDPRPCR 
AMDPROOT 
AMDPRPJB 
AMDPRPMG 


CSECT 


AMDPRCTL 
AMDPREND 
AMDPRMSC 


AMDPRXIT 
AMDPRCVT 


AMDPRDPS 
AMDPRPCB 


AMDPREAD 
AMDPRECT 
AMDPREXT 
AMDPRFAR 
AMDPRFLT 
AMDPRFMG 


AMDPRFMT 


AMDPRFOR 
AMDPRFRM 
AMDPRFDB 
AMDPRFIO 
AMDPRFLD 
AMDPRFRB 
AMDPRFSC 
AMDPRFTC 


AMDPRFUB 
AMDPRFXT 
AMDPRGCD 
AMDPRGET 
AMDPRGSA 
AMDPRGFT 
AMDPRGNX 
AMDPRJNA 


AMDPRLOD 


AMDPRLPA 
AMDPRLRF 
AMDPRMST 
AMDPRNUC 
AMDPROOT 
AMDPRPCR 
AMDPROOT 
AMDPRPJB 
AMDPRPMG 
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Return 
Code 


None 


None 
0 
4 
None 
0 


4 
None 


None 
None 
None 
Not 
applicable 
0 

4 
None 
None 
None 
None 
None 
None 
None 
0 


4 


None 
None 
None 
None 
None 
None 
None 


None 
None 
None 
None 
None 
None 
None 
None 
Not 
applicable 
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Meaning 


AMDPRDMFP termination in progress. 
Control statement has been completely 
processed. 

Error discovered during control statement 
processing. 


CVT formatting completed. 
Storage not available. 


A PCB has been dequeued and the information 
placed in the caller’s work area. 
PCB queue is empty. 


Not applicable. 


All formatting completed. 
Formatting incomplete. 


Formatted TCB represents task that was active 
in dumped system. 

Formatted TCB represents task that was 
terminated in dumped system. 


JOBNAME valid, HOME ASID and ASCB 
address. 

ABDPL unavailable. 

CVT unavailable. 

ASVT unavailable. 

No matching jobname. 

Loading of SYSUT1 work data set is 
complete;dump formatting may begin. 

The input data set cannot be positioned to the 
requested information. 

Terminate AMDPRDMP; load mode requested 
and EOF encountered. 
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Module 
AMDPRPMS 


AMDPRRDC 


AMDPRREC 


AMDPRSCN 


AMDPRSEG 


AMDPRSLI 
AMDPRSMG 
AMDPRSN2 


AMDPRSUM 
AMDPRSUM 


AMDSYS00 


CSECT 


AMDPRPMS 
AMDPRPMX 
AMDPRRDC 


AMDPRCON 
AMDPRHEX 
AMDPRTME 
AMDPRSCN 


AMDPRSEG 


AMDPRSLI 
AMDPRSMG 
AMDPRSN2 


AMDPRSUM 
AMDPRSUM 


AMDSYS00 
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Return 
Code 


None 
None 


None 


None 


None 
None 
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Meaning 


Storage is not available for buffers or there is 
no valid input data set. 


Processing is complete. 


EDIT control statement syntax is correct and 

EDIT processing may continue. 

Discontinue EDIT processing for one of the 

following reasons: 

@ AMDPRDMP control statements are being 
entered from the SYSIN data set, the EDIT 
contro] statement indicates that trace data is 
to be edited from a dump data set, and the 
AMDPRDMP flush mode switch is on. 

@ AMDPRDMP control statements are being 
entered from the SYSIN data set and an 
error has been discovered in the EDIT 
control statement. 

Successful completion of module loading, or 

TOD conversion. 

User format appendage greater than 10K and 

could not be loaded, or TOD value was zero. 

Module not found by BLDL macro instruction. 

Module name is given in message AMD177I. 

[/O error during execution of BLDL macro 

instruction. 

AMDPRSEG attempted to delete a module that 

was not currently in virtual storage. 


A syntax error has been discovered by a 
keyword subroutine; flush mode processing 
must begin. 

Keyword processing is complete; AMDPRSCN 
must determine whether the end of the current 
control statement has been reached. 
AMDPRSCN is requested to determine whether 
unmatched parentheses are in the EDIT control 
statement. 

AMDPRSN2 must issue the invalid parenthesis 
error message. 

Contro] statement scan is to continue; 
AMDPRSCN will attempt to isolate the next 
EDIT keyword. AMDPRSN3 AMDPRSN3 0 
EDIT control statement syntax IS correct. 

Error in EDIT contro} statement. 


Dump data read was successful. 

Requested data could not be read. 

First output line has been formatted: 
AMDPRAPP should print this line and return 
to AMDSYS00. 

Second output line has been formatted; 
formatting for this trace record is complete. 
AMDPRAPP should print the line and 
complete processing for this record. 

Error encountered in formatting the trace 
record, or selective editing was in effect and this 
record is not to be edited. 

Record should be dumped in hexadecimal. 
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Module 
AMDSYS01 


AMDSYS02 


AMDSYS03 


AMDSYS04 


AMDSYS05 


AMDSYS06 


AMDSYS07 


CSECT 
AMDSYS01 


AMDSYS02 


AMDSYS03 


AMDSYS04 


AMDSYS05 


AMDSYS06 


AMDSYS07 
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Return 
Code 


12 


Meaning 


First output line has been formatted: 
AMDPRAPP should print the line and return 
to AMDSYS01. 

Second output line has been formatted; 
formatting for the current record is complete. 
AMDPRAPP should print the formatted line 
Error encountered in formatting the trace 
record, or selective editing is in effect and this 
trace record is not to be formatted. 

Record should be dumped in hexadecimal. 
First output line has been formatted: 
AMDPRAPP should print the line and return 
to AMDSYS02. 

Second output line has been formatted; 
formatting for this record is complete. 
AMDPRAPP should print the line. 

Error encountered in formatting the record, or 
selective editing is in effect and this record is 
not to be formatted. 

Record should be dumped in hexadecimal. 
Current trace record has been formatted; 
AMDPRAPP should print the record. 

Error encountered in formatting the record, or 
selective editing is in effect and this record is 
not to be formatted. 

Record should be dumped in hexadecimal. 
First output line has been formatted: 
AMDPRAPP should print the line and return 
to AMDSYS04. 

Second output line has been formatted; 
formatting for this record is complete. 
AMDPRAPP should print the line. 

Error encountered in formatting the record, or 
selective editing is in effect and this record is 
not to be formatted. 

Record should be dumped in hexadecimal. 
First output line has been formatted; 
AMDPRAPP should print the line and return 
to AMDSYS05. 

Second output line has been formatted; 
formatting for this record is complete. 
AMDPRAPP should print the line. 

Error encountered in formatting the record, or 
selective editing is in effect and this record is 
not to be formatted. 

Record should be dumped in hexadecimal. 
First output line has been formatted: 
AMDPRAPP should print the line and return 
to AMDSYS06. 

Second output line has been formatted; 
formatting for this record is complete. 
AMDPRAPP should print the line. 

Error encountered in formatting the record, or 
selective editing is in effect and this record is 
not to be formatted. 

The return code is zero when any output line 
except the final output line has been formatted. 
AMDPRAPP should print the line and return 
to AMDSYS07. 

Final output line has been formatted; 
formatting for this record is complete. 
AMDPRAPP should print the line. 

Error encountered in formatting the record, or 
selective editing is in effect and this record is 
not be formatted. 

Record should be dumped in hexadecimal. 
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Section 6: AMDPRDMP Macro Instructions 


AMDDATA 


AMDPCBPL 


AMDMNDXT 


BRPRTMSG 


BRREAD 


The AMDDATA macro is a mapping macro for the various input record formats 
accepted by AMDPRDMP. AMDPRDMP modules use this macro instruction 
for symbolic references to fields within the input. AMDDATA is also available 
to the AMDSADMP and SVC dump programs to define their output records 
(which are later input to AMDPRDMP). 


The AMDPCBPL macro is a mapping macro for the PCB to be used as input to 
the AMDPRPCB routine in module AMDPRDPS. 


The AMDMNDXT macro generates the index descriptor table. All 
AMDPRDMP modules that have predefined index entries use this macro. 


The BRPRTMSG macro generates linkage to CSECT AMDPRMSG in 
AMDPRCOM in order to write a message in SYSPRINT output data set. The 
BRPRTMSG macro instruction has two parameters: the first is the address of the 
message to be printed and the second is the length of the message. 


The BRREAD macro generates linkage to AMDPRRDC to perform one of three 
functions, depending on the keyword specified as the first or second parameter in 
the macro instruction: 


@ ADJUST — causes AMDPRRDC to free buffers and the buffer map. 


@ INIT — causes AMDPRRDC to load AMDPRLOD to write the input data 
set into SYSUT1 or SYSUT2 (if provided in JCL); to initialize buffers and a 
buffer map; and, for each new dump, to call AMDPRMST to initialize 
COMMON, and to build ASCBMAP. 


@ DATA — causes AMDPRRDC to locate the input record that contains the 
requested data and return the address of the data in the buffer to the caller. 
For details of the DATA function, refer to the description of reading input 
data in the “Program Organization” section. 


@ LENGTH — is meaningful only as an option of the DATA function. 
LENGTH causes AMDPRRDC to return the specified amount of data (up to 
4K maximum) to the issuer. The default is a length of zero and indicates that 
the length of the data depends on the boundary of the specified address. 
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BRWRITE 


COMMON 


EQUATES 


FMTPTRN 


HEXCNVT 


IMDMEDIT 
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The BRWRITE macro generates the linkage to CO9ECT AMDPRWITR in 
AMDPRCOM in order to write a line in the PRINTER output data set. The 
information to be written must be in the buffer pointed to by the CURBUF field 
of COMMON. The BRWRITE macro instruction contains two parameters. The 
first is either 1, 2, 3 or SKIP to indicate the number of lines to skip after the 
written line. The second parameter is a keyword, either IMM or AFT (or blank), 
which indicates whether to space immediately or after wnting the CURBUF field. 


The COMMON macro is the mapping macro for the common communication 
area (COMMON). It is used by all AMDPRDMP modules to generate the 
COMMON DSECT. For a detailed description of COMMON, see the “Data 
Areas” section of this chapter. 


The EQUATES macro instruction generates a list of EQU instructions used by all 
AMDPRDMP modules. 


The FMTPTRN macro instruction generates a parameter list that is passed to 
CSECT AMDPRGFR in AMDPRCOM in order to format a line of output. 
Each FMTPTRN macro instruction must contain the attributes of the data, the 
length of the label to be assigned, the length of the data, the offset of the label in 
the output line, the offset of the data, and, optionally, the address of the label 
string and the address of the data. 


The HEXCNVT macro instruction generates the code to convert a value from 
internal binary to printable hexadecimal. 


The IMDMEDIT macro instruction generates a list of symbolic names with 
equated hexadecimal event identifiers (EDs) for events that are traced by GTF. 
IBM components and users that write EDIT user exit routines use the 
IMDMEDIT macro instruction to reference the EID field in a trace record built 
by GTF. 


The IMDMEDIT mapping macro instruction is as follows: 


IMDMSSM EQU 0 OS SSM FOR COMPATIBILITY 
IMDMSSM1 EQU 0 SSM INTERRUPT 

IMDMPIPG EQU 0 PAGE FAULT PROGRAM INTERRUPT 
IMDMDSP1 EQU X‘0001’ DISPATCHER 

IEADISP1 EQU IMDMDSP1 DISPATCHER 

IMDMDSP2 EQU X*0002’ DISPATCHER 
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[EADISP2 
IMDMDSP 
IMDMDSP3 
IEADISP3 
IMDMDSP4 
IEADISP4 
IMDMSVC 
IEASVCH 
IMDMPCI 
IECPCI 
IMDMSRM 
JIRASRM 
IMDMSTAE 
IEASTAE 
IMDMFRR 
IEAFRR 
IMDMSLSD 
IEAVSLSD 
IMDMSLSU 
IEAVSLSU 
IMDMSLUR 
IEAVSLUR 
IMDMSIO 
IECSIO 
IMDMEOS 
TECEOS 
IMDMCSCH 
TECCSCH 
IMDMHSCH 
IECHSCH 
IMDMMSCH 
IECMSCH 
IMDMSSCH 
TECSSCH 
IMDMRSCH 
IECRSCH 
IMDMIO2 
TECIO2 
IMDMIO1 
JECIO] 
IMDMPI 
IEAPINT 
IMDMTINT 
IEATINT 
IMDMEXT 
IEAEINT 
IMDMTP1 
ISPTPIOI 
IMDMTP2 
ISPTPIO2 
IMDGPD0O] 
IMDGPD02 
IMDGPD03 
IMDGPD04 
IMDGPD05 
IMDGPD06 
IMDGPD07 
IMDGPD08 
IMDGPD09 
IMDGPD10 
IMDGPD11 
IMDGPD12 
IMDGPD13 
IMDGPD14 
IMDGPD15 
IMDGPD 16 
IMDGPD17 
IMDGPD18 
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EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 


IMDMDSP2 
‘0003’ 
‘0003’ 
IMDMDSP3 
‘0004’ 
IMDMDSP4 
X‘1000’ 
IMDMSVC 
X°2100’ 
IMDMPCI 
X*4001’ 
IMDMSRM 
X*4002’ 
IMDMSTAE 
X°4003° 
IMDMFRR 
4004’ 
IMDMSLSD 
X°4005’ 
IMDMSLSU 
X*4006’ 
IMDMSLUR 
**5100’ 
IMDMSIO 
x'S1OL 
IMDMEOS 
3102’ 
IMDMCSCH 
3103’ 
IMDMHSCH 
3104 
IMDMMSCH 
X‘*S105’ 
IMDMMSCH 
X°5106’ 
IMDMRSCH 
X‘5200° 
IMDMIO2 
X*5201" 
IMDMIOI 
X‘6101’ 
IMDMPI 
X'6200 
IMDMTINT 
X‘6201’ 
IMDMEXT 
%*8 100’ 
IMDMTP1 
X°8200’ 
IMDMTP2 
X'EFAF’ 
‘EF BO’ 
X*EFBI’ 
‘EF B2’ 
‘EF B3’ 
X‘EF BQ’ 
X‘EFBS’ 
X'EFBO’ 
X‘EFB7’ 
X‘EFB8’ 
X‘EFB9’ 
X‘EFBA’ 
X‘EFBB’ 
X*EFBC’ 
X*EFBD’ 
X‘EFBE’ 
X‘EFBF’ 
X‘EFCO’ 
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DISPATCHER 

DISPATCHER 

DISPATCHER 

DISPATCHER 

SVC EXIT PROLOG DISPATCH 

EXIT PROLOG DISPATCH 

SVC INTERRUPT 

SVC INTERRUPT 

PCI I/O INTERRUPT 

PCI 1/0 INTERRUPT 

SRM 

SRM 

RTM 

RTM 

RTM 

RTM 

RTM/SLIP STANDARD RECORD 
RTM/SLIP STANDARD RECORD 
RTM/SLIP STANDARD + USER RECORD 
RTM/SLIP STANDARD + USER RECORD 
RTM/SLIP USER RECORD 

RTM/SLIP USER RECORD 

SIO OPERATION 

SIO OPERATION 

10S 

10S 

CLEAR SUBCHANNEL GTF RECORD 
CLEAR SUBCHANNEL GTF RECORD 
HALT SUBCHANNEL GTF RECORD 
HALT SUBCHANNEL GTF RECORD 
MODIFY SUBCHANNEL GTF RECORD 
MODIFY SUBCHANNEL GTF RECORD 
START SUBCHANNEL GTF RECORD 
START SUBCHANNEL GTF RECORD 
RESUME SUBCHANNEL GTF RECORD 
RESUME SUBCHANNEL GTF RECORD 
1/0 INTERRUPT 

1/O INTERRUPT 

1/0 INTERRUPT 

1/O INTERRUPT 

PROGRAM INTERRUPT 

PROGRAM INTERRUPT 

PFLIH 

PFLIH 

EXTERNAL INTERRUPT 

EXTERNAL INTERRUPT 

TPIOS 

TPIOS 

TPIOS 

TPIOS 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 


LY28-1189-2 © Copyright IBM Corp. 1982 1985 





Contains Restricted Materials of IBM 
Licensed Materials — Property of IBM 


IMDGPD 19 
IMDGPD20 
IMDGPD21 
IMDGPD22 
IMDGPD23 
IMDGPD24 
IMDGPD25 
IMDGPD25 
IMDGPD27 
IMDGPD28 
IMDGPD29 
IMDGPD30 
IMDGPD31 
IMDGPD32 
IMDGPD33 
IMDGPD34 
IMDGPD35 
IMDGPD36 
IMDGPD37 
IMDGPD38 
IMDGPD39 
IMDGPD40 
IMDGPD4|1 
IMDGPD42 
IMDGPD43 
IMDGPD44 
IMDGPD45 
IMDGPD46 
IMDGPD47 
IMDGPD48 
IMDGPD49 
IMDGPD50 
ISTVIEIE 
ISTTHEID 
ISTTREID 
ISTTDEID 
ISTTPEID 


ISTRPEID 
ISTCLEID 


ISTLNEID 
IGGSP002 
IGGSP008 
IDAAMO] 
IGGSP112 
IGGSP215 
IGGSP119 
IGGSP235 
IGGSP239 
IGGSP145 
IGGSP251 
IGGSP451 
IGGSP169 


IMDMDMAIl 


IMDMSVCD 
IEASVCD 
JEAABOF 


EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 


EQU 
EQU 


EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
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EFC’ 
Xx EFC2’ 
X*EFC3’ 
XSEFC4’ 
X°EFCS’ 
X‘EFC6’ 
X‘EFC?7’ 
X‘EFC8’ 
X*EFC9’ 
X‘EFCA’ 
X‘EFCB’ 
XSEFCC’ 
X‘EFCD’ 
X‘EFCE’ 
X'EFCF’ 
X*EFDO’ 
X‘EFD 1° 
X*EFD2’ 
X‘EFD3’ 
X‘EFD4’ 
X‘EFDS’ 
X‘EFD6’ 
X*EFD7’ 
X‘EFD8’ 
X°EFD9’ 
X*EFDA’ 
X‘EFDB’ 
X*EFDC’ 
X*EFDD’ 
X‘EFDE’ 
X‘EFDF’ 
X‘EFEO’ 
X‘EFEL’ 
X‘EFE2’ 
X‘EFE3?’ 
X"EFE4’ 
X*EFEF’ 


X*EFFO’ 
X‘EFF]’ 


X‘EFF2’ 
X‘EFF3’ 
X*EFF4’ 
X'EFFS’ 
X‘EFF6’ 
X‘EFF7’ 
X‘EFF8’ 
X‘EFF9’ 
XSEFFA’ 
X*EFFB’ 
X‘EFFC’ 
X*EFFD’ 
X‘EFFE’ 
X‘EFFF’ 
X‘F100’ 
IMDMSVCD 
X‘F200’ 


RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
ACF/VTAM INTERNAL TRACE 
TSO/VTAM TGET/TPUT TRACE 
VTAM RESERVED 
ACF/VTAM NCP LINE TYPE TRACE 


ACF/VTAM USER BUFFER CONTENTS 


TRACE 


ACF/VTAM SMS (BUFFER USE) TRACE 


ACF/VTAM COMPONENT BUFFER 
CONTENTS TRACE 


ACF/VTAM NCP LINE OR TG TRACE 


SAM/PAM/DAM 
SAM/PAM/DAM 
VSAM 
SAM/PAM/DAM 
SAM/PAM/DAM 
SAM/PAM/DAM 
SAM/PAM/DAM 
SAM/PAM/DAM 
SAM/PAM/DAM 
SAM/PAM/DAM 
SAM/PAM/DAM 
SAM/PAM/DAM 
OPEN/CLOSE/EOV 
SVCDUMP 
SVCDUMP 


ABEND/SNAP-OUT-NOT USED BY EDIT 
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OUTBUFM 
The OUTBUFM macro instruction is the mapping macro for an output line in 
the PRINTER data set. AMDPRDMP modules use this macro instruction to 
position data in the line. 

SYNEPS 


The SYNEPS macro instruction is the mapping macro instruction for the entry 
points for CSECT AMDPRSYN in AMDPRCOM. 
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Chapter 4. Stand-Alone Dump (AMDSADMP) 


Section 1: Introduction 


AMDSADMP Macro Instruction 


The stand-alone dump program is supplied to you as a macro definition, 
AMDSADMP, in the SYS1.MACLIB system library. You code the 
AMDSADMP macro instruction, using the keyword operands to tailor the dump 
program to the installation. For a description of the AMDSADMP macro 
instruction and its keywords, refer to Service Aids. 


After coding the macro instruction, you put the SADMP program onto the 
residence volume in ready-to-load form, using either of two methods. In 
two-stage generation, first you assemble the AMDSADMP macro in order to 
produce stage-two JCL. Then you execute this job in order to initialize the 
SADMP residence volume. In one-step generation, you code the same 
AMDSADMP macro as an input control statement for the AMDSAOSG 
program, and then execute AMDSAOSG. 


In either case, SADMP residence volume initialization consists of three phases: 


1. The assembly of the AMDSADM2 macro produces the SADMP real storage 
dump program AMDSARDM, which dumps real storage, and the SADMP 
common communication table AMDSACCT, an internal control block. 


2. The SADMP build module AMDSABLD puts the output from phase one 
onto the residence volume in ready-to-load form. AMDSABLD relocates the 
SADMP IPL program AMDSAIPL and the SADMP virtual storage dump 
program AMDSAPGE, and puts them onto the residence volume. 

3. If the residence volume is a direct access device, the device utility ICK DSF is 
invoked to put SADMP’s IPL text onto the device’s IPL track (cylinder 0, 
track 0). 

The SADMP program has four basic variations: 


@ High-speed, residing on a direct access device, with output directed to a tape 
volume. 


@ High-speed, residing on a tape device, with output directed to a tape volume. 
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@ Low-speed, residing on a direct access device, with output directed to a tape 
volume. 





@ Low-speed, residing on a direct access device, with output directed to a 
printer. 


High-Speed Dump Program 

The high-speed version of SADMP dumps all real storage and areas of virtual 

storage not backed by real storage. The output is unformatted and intended for 

later machine processing by AMDPRDMP. The output includes: 

@ A dump title. 

@ The processor store-status information for each processor. 

@ Real storage from address 0 to the top of real storage in real address sequence 
(some blocks may be missing because they are offline or are backing the 
hardware system area). 

@ Instruction trace data created by the console-initiated loop recording. 


@ Selected virtual storage areas. 


@ A log of console messages written during the dumping of MVS virtual 
storage. 





If SADMP detected an internal error, the output might also include one or more 
SADMP self-dumps. SADMP dumps the instruction trace data and paged-out 
virtual storage only when SADMP is able to access virtual storage. 


Notes: 
I. Stand-alone dump uses only online devices. When dumping to or from devices 
that have both real and virtual addresses, specify only the real address to 


SADMP. SADMP must reside on an online storage device. 


2. You cannot direct SADMP output to its residence volume. 


Low-Speed Dump Program 


The low-speed version of SADMP produces formatted output containing a dump 
title specified at dump execution time, processor related data for each available 
processor, and a dump of user-selected areas of real storage. 
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Section 2: Method of Operation 


This section describes how the stand-alone dump program produces the dumps. 
As shown in SADMP Figure 4-1, the description begins with an overview, then 
describes the following stages of the overall processing: 


@ Specification stage 


@ Initialization stage 
@ Dump execution stage 


Note: SADMP also formats the console message log under IPCS and PRDMP. 


Reading Method of Operation Diagrams 


Method of operation diagrams are arranged in an input-processing-output layout: 
the left side of the diagram contains the data that serves as input to the processing 
steps in the center of the diagram, and the right side contains the data that is 
output from the processing steps. Each processing step is numbered; the number 
corresponds to the verbal description of the step in the extended description. 
While the processing step in the diagram is in general terms, the corresponding 


text is a specific description that includes a cross-reference to the code for the 
processing. 
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Stand Alone 
Dump 


Two-Stage One-Step AMDSAFCM 


Generation Generation 
AMDSADMP AMDSAOSG 





AMDSADM2| | AMDSABLD ICK DSF 


ampsaiPL | | AMDSADIP | | Real Storage Virtual Storage 


Dump Program Dump Program 


AMDSARDM AMDSAPGE 





Figure 4-1 (Part 1 of 2). Key to Method of Operation Diagrams for the Stand-Alone Dump Program 
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Key to Method of Operation (MO) Diagram Symbols 


Entry into processing Look for corresponding numbers in text 


Look for blow~up of item on same page 


Flow of Control! 


Look for corresponding-—lettered blow-up 
on same page 


Data Transfer 





Braces to denote related items 







————}>» or Pointer to or address of 
See referenced diagram for detailed 
description 

<f}-—_—_}» Reference to data 
Reference to another diagram 





Figure 4-1 (Part 2 of 2). Key to Method of Operation Diagrams for the Stand-Alone Dump Program 
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Diagram SADMP-!. AMDSAAID — Address Space Locater (Part 1 of 2) 


Input Process 






RCB Queue 





1 Enqueue the AID RCB. 





CTASCBM 





CTASCBA 





2 Set the fields associated with 
the master scheduler address 
space. 


CTAASIDD 





list. 


4 Call AMDSASIN to swap in 
the address space. 


6 Call AMDSAGTF. 


7 Report any extended storage 
errors by issuing message 


RCB Queue AMDO75l. 







AIDRCB 


RCB queue. 


‘3 Dump each address space on the 


5 Call AMDSAMDM for dumping. 


8 Dequeue the AID RCB from the 


Output 















AIDRCB 


CTASCBM CTASCBA 


ASVTENTY ASVTENTY 


CTAASIDD 


ASLBASID 


Original RCB Queue 
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Diagram SADMP-1. AMDSAAID — Address Space Locator (Part 2 of 2) 


Extended Description Module 


1 AMDSAAID enqueues the AID RCB. 

2 AMDSAAID fills in fields CTASCBM and CTASCBA. 

3 AMDSAAID dumps each address space on the list of address spaces. 
AMDSAAID calls AMDSASIN to swap in the address space. 


wn 


AMDSAAID calls AMDSAMDM to dump the appropriate data areas. 
AMDSAAID calls AMDSAGTF to dump GTF virtual dump buffers. 


an 


7 If SADMP detected any errors while dumping from extended storage, AMDSAAID writes message 
AMD075] to the operator console. This is done after all address spaces have been dumped and for 
each address space that had errors dumping from extended storage. 


8 AMDSAAID dequeues the AID RCB from the RCB queue. 


Label 
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Diagram SADMP-2. AMDSAARD — Address Range Dump (Part 1 of 2) 






occurs, set error return code 
and exit. 







Error. Return 
to Caller 






RANGEBEG RANGEEND 







3 If non-zero length request, 


merge the ranges. 
4 Compare input address range 
with addresses in ARB queue: 


e If no overlap, enqueue new 
ARB. 
GETARB 
e@ If overlap, merge ranges to 


modify existing ARB. 


PAGEBDRY PAGESIZE 










RANGEBEG 





5 Return to caller. 





Output 
Register 0 RANGEBEG RANGEEND 

Receive input address, preset po 
return code. 

Register 15 

RANGEDMP 

If zero length request, call for 
adump. If an error in dumping Register 15 


New New 
RANGEBEG RANGEEND 


ARB Queue 

New 
ARB Queue ARB 
Modified 
ARB 
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Diagram SADMP-2. AMDSAARD — Address Range Dump (Part 2 of 2) 


Extended Description Module Label 


AMDSAARD collects and merges the address ranges when 
overlaps occur, for zero length requests, AMDSAARD 
dumps each page within the range. 


1. AMDSAARD receives the input beginning address in 

register 1 and saves the beginning address in 
RANGEBEG. AMDSAARD calculates the ending address 
and saves the ending address in RANGEEND. AMDSAARD 
presets the return code to zero. 


2 AMDSAARD determines the function to be performed 
according to the value in register 0. If the value is 
zero, AMDSAARD calls RANGEDMP to dump every page RANGEDMP 
listed in the ARB queue. If the dump fails, RANGEDMP 
sets an error return code of 4 and terminates. 


3. OCI f register O contains a nonzero value, AMDSAARD 
merges the input address range with the address 
ranges on the ARB queue. The ARB queue is in ascending 
order. AMDSAARD examines the ARBs, starting at the 

beginning of the ARB queue. 


4 AMDSAARD compares RANGEBEG to the ARB 
beginning and ending addresses. If the input address 
range does not overlap with any ARBs, AMDSAARD 
calls GETARB to enqueue a new ARB containing the GETARB 
input address range. If the input address range does over- 
lap with an existing ARB, AMDSAARD merges the input 
address range into that ARB. If AMDSAAUD skips over 
the entire ARB queue because all ARBs end before the 
input address begins, AMDSAARD adds the new ARB to 
the end of the ARB queue. 


fF AMDSAARD returns to the caller. 


Wa] Jo Ajradoig — sjByiayeyAQy pasuaary 


WAI JO s[er1aByQ payouysay sureyu07 


21907] SPply ad1AJag ainyoaYyoy papuaxg/SAN QI-p 


S861 7861 “40D Wa 148uAdoD © 7-681I1-8ZAT 


Diagram SADMP-3. AMDSAASM — Auxiliary Storage Management (Part 1 of 4) 


Input Process 





Register 1 BCT 


So _—_—__ 1 Receive input BCT, and enqueue 


the ASM RCB., 
CTA SMVTB 


 —___.........) 2 Set an error code and return if 


the ASMV'T is invalid. 


RCB Queue 


ASMRCB TT 


3 Convert LSID to a seek, address 
and subchannel ID. Set an error 
code and terminate if one of the 
following occurs: 


BCTSWPDS 


BCTINDEX CTPARTB 





@e The PART or PART entry is 


invalid. 
PARTEUSE 


PAREDSBD 


| 
L 


The page data set is invalid. 


CTSARTB 
The SART or SART entry 
is Invalid, 


SARUSE 


The SART entry is not 
in use or the SART data 
set is invalid. 


SREDSBD 


Register 0 


EDB 


fil 
Me 


4 Check validity of the EDB. 


L C 











Register 15 


[| 


Return to 
caller 







Register 15 





On Error 
Return to 
Caller 


? VCHK 
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Diagram SADMP-3. AMDSAASM — Auxiliary Storage Management (Part 2 of 4) 
Extended Description Modale Label 


AMDSAASM converts a Jogical slot identifier (LSID), which is the auxiliary storage ID for a page, into 
the direct access seek address of the auxiliary storage copy. 


1 AMDSAASM receives the input buffer control table (BCT), and enqueues an ASMRCB. 


2 If the CTASMVTB is on, an error code of 4 is set. 
3 AMDSAASM converts the LSID to a seek address and subchannel ID. For the following errors, 
AMDSAASM sets an error return code of 4, dequeues the ASMRCB, and terminates: 
@ The PART control block is invalid. 
@ The PART entry or page data set is invalid. 
@® The SART control block or SART entry is invalid. 
@® The SART entry is not in use. 
@ The SART data set is invalid. 
4 AMDSAASM calls ?VCHK to check the validity of the EDB. If it is invalid, 7?VCHK sets a return IVCHK 


code of 4 and AMDSAASM terminates. 
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Diagram SADMP-3. AMDSAASM — Auxiliary Storage Management (Part 3 of 4) 


Input 


Register 1 


UCBPTR 


Process 


CONVOUT 


RBA OT  ) § SOCConrvert the RBA into an 


auxiliary Storage address. 


e If convert fails set an error 
return code and terminate. 


UCB 


=> § Find or create an IODB. 


RCB Queue 


ASM RCA 





7 Seta return code, dequeue the 
ASM RCB, and pass the |ODB 
to the caller. 





Output 
Register 1 
ILRCNVRT 
Register 15 


Return to 


Caller IODB 


Register 15 





MBBCCHHR 


Register 1 


Original RCB Queue 


Wal Jo Ajradorg — speiiej8yy] pesuaary 


NGI JO S[euayeyy payouysay sureuo-) 


C861 7861 “a0D WAI 1YsUAdOD © 7-681 I-8ZAT 


(dWAVSAWY) dung auo0[y-puLis ‘p s9ideya 


cI-v 


C C 


Diagram SADMP-3. AMDSAASM — Auxiliary Storage Management (Part 4 of 4) 
Extended Description Modale Label 


5 AMDSAASM calls ILRCNVRT to convert the RBA into an auxiliary storage address 
(MBBCCHHR). ILRCNVRT sets a return code of 0 if the conversion is successful, or a return code 
of 4 if the conversion is not successful. 


6 AMDSAASM calls 710 to find the IODB corresponding to the UCB. If the IODB does not exist, 710 210 
creates one. 


7 AMDSAASM sets a return code of 0, dequeues the ASMRCB, and returns. Register 1 points to the 
IODB. 
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Diagram SADMP-4. AMDSAAUD - Virtual Storage Dump Error Handling 


Input 





IECAUDIC 


Process 


(Part 1 of 4) 


1 Save entry registers in page 0. 


Se 2 Terminate if there was an error 


a ————— 


Current SVC : 3 
Stack Top 


4 

CCT: 

pares 

CTAUDPL 

a 

IECIOSER 
5 
6 





in AMDSAAUD, and then 
indicate that AMDSAAUD is 
in control. 


e If an error occurred, load 
a disabled wait X’4FOD01' 


Record the error. 


Terminate if one of the following 
conditions occur: 


@ There is recursion through 
AMDSAAUD. 


@ The master segment table 
designation in the CCT is 
invalid. 


@ The caller wants to recover 
but the RCB queue is 
empty. 


e There was anerror in the 
1/O service. 


If requested, dump SADMP. 


Set the exit PSW and select 
the appropriate exit. 


e If aterminating error occurred 


rewind and unload the output 
tape and load a wait PSW. 


C 


Output 


TH 


IECAUDIC 
PGOAUDSA 


! 


IECAUDER 


IECIOSER 


i 


TRACE 


T—] New Entry 


AUDECODE 


i 


TERMINAT=ON AUDEREAS 


7 


PGOAPSW=MODELPSW 


X‘0108000080000000' 


WPWRCODE=AUDERWRC 
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Diagram SADMP-4. AMDSAAUD — Virtual Storage Dump Error Handling (Part 2 of 4) 
Extended Description Module Label 


AMDSAAUD saves the entry registers in page 0. 


AMDSAAUD examines the Internal Error Control (IEC) area to see if either AMDSAAUD or the IECAUDER 
SADMP I/O service was in control when the error occurred. AMDSAAUD sets IECAUDER = 1 if 

IECAUDIC = | and IECIOSER = | given JECIOSIC = 1. If the error was in AMDSAAUD 

(ECAUDER = I and IECIOSER = 0), AMDSAAUD immediately loads a disabled wait PSW. 


AMDSAAUD locates the appropriate SVC number and records the error. 
AMDSAAUD terminates if any of the following conditions exist: 


@ There is an error in the 1/O service (IECIOSER = 1). 
@ The caller wants to recover but the RCB queue is empty (CTAUDRV = | and CTRCB = 0). 


AMDSAAUD dumps SADMP if a dump is requested or if a terminal error exists (CTAUDDMP = 
| or TERMINAT = 1). 


AMDSAAUD sets the exit PSW equal to X‘0108000080000000" and selects an appropriate exit: 


If a terminating error occurred (CTAUDTRM = | or TERMINAT = 1), AMDSAAUD rewinds 
and unloads the output tape and loads a wait PSW. 
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Diagram SADMP-~4. AMDSAAUD — Virtual Storage Dump Error Handling (Part 4 of 4) 
Extended Description Module Label 


@ If the caller requested recovery (CTAUDRCV= 1), AMDSAAUD sets up the top error recovery 
environment (RCB). 


@ If no special exit was requested, AMDSAAUD returns to the caller. 
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Diagram SADMP-5. AMDSABLD — Build Module (Part 1 of 10) 


Register 1 








Process 


1] Open SYSPRINT data set DCB. 


2 Check the validity of the input 
parameters. 


If input parameters are 
invalid, set return code 8. 


3 Open data set DCBs. 


If any data set DCB is not 
opened, return. 















Error. Return 
to the Caller. 


Return 





Output 


TYPE 


H! or LOW 
IPL 


LOADPT 


[| 


Register 15 


Register 15 


[ 4 | 
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Diagram SADMP-5. AMDSABLD — Build Module (Part 2 of 10) 


Extended Description Module 


AMDSABLD performs part of the initialization of the stand-alone dump program. 


1 AMDSABLD opens the SYSPRINT data set DCB so that error messages can be printed. 


2 AMDSABLD converts the input parameter, which is a character string, into three parameters; TYPE, 
IPL, and LOADPT. TYPE is the speed of the dump (HI or LOW). IPL specifies the unit type of 
the dump residence volume, either T for tape or D for direct access device. LOADPT is an 
eight-digit hexadecimal number representing the address in rea] storage at which AMDSARDM will 
be loaded. AMDXCB converts LOADPT from a hexadecimal character string into a binary number. 
AMDSABLD checks the validity of the three input parameters. If any of the input parameters are 
invalid, AMDSABLD sets the return code and calls AMDEXIT to terminate processing and return 
to the caller. 


3 AMDSABLD opens the data set DCBs for SYSPUNCH, IPLTEXT, IPLDEV, and if TYPE=HI, 
for PGETEXT. If any open was unsuccessful, AMDSABLD calls AMDMESSG to print message 
AMD0351. Then AMDSABLD sets the return code and returns to the caller. 


Label 


AMDXCB 


AMDEXIT 


AMDMESSG 
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Diagram SADMP-5. AMDSABLD — Build Module (art 3 of 10) 


Input Process Output 











PINBUF 


POUTBUF 


PRLTBUF 


4 Obtain storage for buffers. 
















INBUFFER 


OUTBUFFER: 
RLTBUFFR 










e@ If GETMAIN fails, return. 














Error. Return 
to Caller. 










TAPEIPLi TAPEIPL2 





FB Process tape dump (if IPL=T) 


for both high and low speed AMD042! 


fl 
io) 
i) 


Load Module eum: Register 15 
e Write IPL1 and IPL2 to 
tape. 
a @ Read and process AMDSAIPL, 
AMDSACCT | Obiect Module AMDSACCT, and AMDSARDM 


aay ior enn aa) 
AMDSARDM 


e Write AMDSAIPL, AMDSACC 
and AMDSARDM to tape. 
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Diagram SADMP-5. AMDSABLD — Build Module (Part 4 of 10) 
Extended Description Module Label 
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AMDSABLD issues GETMAINS to obtain storage for the input buffer, the output buffer, and the 
relocation table (RLT) buffer. INBUFFER is large enough to hold an input record of any length. 
OUTBUFFER is large enough to contain the storage that SADMP uses at run time. The RLT 


buffer is the area used for building the RLT. If the GETMAIN fails for any of the buffers, AMDMESSG 
AMDSABLD calls AMDMESSG to print message AMD0421. AMDSABLD sets the return code 

and returns to the caller. 

For tape dump processing of both high and low speed dumps, AMDSABLD calls AMDWRITE to AMDWRITE 
write IPLI and IPL2 on to the output tape (IPLDEV). AMDSABLD calls AMDTEXT to read and 

process AMDSAIPL, AMDSACCT, and AMDSARDM. If any errors occur in processing these AMDTEXT 
modules, AMDSABLD sets the return code and returns to the caller. If no error occurs, 

AMDSABLD calls AMDWRITE to write AMDSAIPL, AMDSACCT, and AMDSARD©M to the AMDWRITE 


output tape (IPLDEV). 
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Diagram SADMP-5. AMDSABLD — Build Module (Part 5 of 10) 


Input Process 


Load Module 


TTT eee © _=IETYPE=HI, process the high 
speed dump, build the RLT, 


and write AMDSAPGE and 
the RLT to tape. 


AMDSAPGE 


e If an error occurs in process- 
ing either high or low speed 
dump (for IPL=T}, return. 


Error. Return 
to the Caller. 


Output 





AMDSAPGE 
ALT 


Register 15 
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Diagram SADMP-5. AMDSABLD — Build Module (Part 6 of 10) 


Extended Description Module 


For tape dump processing of a high speed dump, AMDSABLD calls AMDTEXT to process 
AMDSAPGE and to build a relocation table. If any errors occur during processing, AMDSABLD 


sets the return code and returns to the caller. If no error occurs, AMDSABLD calls AMDWRITE to 
write AMDSAPGE and the RLT onto the output tape (IPLDEV). 


Label 


AMDTEXT 


AMDWRITE 
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Diagram SADMP-5. AMDSABLD — Build Module (Part 7 of 10) 


Input 
7 


= ——$— = 


DASDIPL1 DASDIPL2 
Load Module Object Module 


AMDSAIPL 


Load Module 


AMDSAPGE 


AMDSARDM 


cows | __ 
AHOSAROM 


nr 2 | 


Process 


If IPL=D, process DASD dump: 


@ Open TRKOTEXT data set 


. i 
e If data set DCB not opened, 


return. 





Register 15 







Error. 
Return 
to Caller. 


IPL2 


Absolute page 0 
AMDSAIPL 








@ Write IPL1 and IPL2 to 
DASD. 






e Write page 0 save area to 
DASD. 







Read and process the following: 


AMDSAIPL 
AMDSACCT 
AMDSARDM 


@ Write AMDSAIPL, AMDSACCT, 
AMDSARM, and the real storage 
dump save area to DASD. 






AMDSACCT 
Real Storage 
Dump Area 
AMDSARDM 
AMDSAPGE 
RLT 


Register 15 






lf TYPE=HI, process high speed dumps, 
build the RLT, and write AMDSAPGE 
and the RLT to DASD. 








@ If an error occurs during processing . 
and IPL=D, return. 


Error. 
Return 
to Caller. 
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Diagram SADMP-5. AMDSABLD — Build Module (Part 8 of 10) 


Extended Description Module Label 
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For DASD dump processing of both high and low speed dumps, AMDSABLD opens the 
TRKOTEXT data set DCB for temporary storage of the boot strap sequence. If the OPEN is 
unsuccessful, AMDSABLD calls AMDMESSG to print message AMD0351. AMDSABLD sets the 
error return code and returns to the caller. If the OPEN is successful, AMDSABLD calls 
AMDWRITE to write IPL! and IPL2 to TRKOTEXT. AMDSABLD creates and empty record to 
be used by the IPL2 channel program to save absolute page zero. AMDSABLD calls AMDMOVE 
to clear the output buffer, and calls AMDWRITE to write absolute page zero to TRKOTEXT. 


AMDSABLD calls AMDTEXT to read and process AMDSAIPL, AMDSACCT, and 
AMDSARDM. If any errors occur in the processing of these modules, AMDSABLD sets the error 
return code and returns to the caller. If no errors occur in processing, AMDSABLD calls 
AMDWRITE, AMDWRITE writes AMDSAIPL to TRKOTEXT, and writes AMDSACCT, 
AMDSARDM, and the real storage dump area to DASD IPLDEV. 


For DASD dump processing of a high speed dump, AMDSABLD builds an RLT and calls 
AMDTEXT to process AMDSAPGE. If an error occurs in processing, AMDSABLD sets the error 
return code and returns to the caller. If no error occurs in processing, AMDSABLD calls 
AMDWRITE to write AMDSAPGE and the RLT to DASD IPLDEV. 


AMDMESSG 


AMDWRITE 
AMDMOVE 


AMDTEXT 


AMDTEXT 


AMDWRITE 
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Diagram SADMP-5. AMDSABLD — Build Module (Part 10 of 10) 


Extended Description Module Label 


9 If the following files are open, AMDSABLD closes the files: TRKOTEXT, PGETEXT, IPLDEV, 
IPLTEXT, and SYSPUNCH. AMDSABLD prints message AMD0431 indicating successful 
completion of dump processing. 


10 IfSYSPRINT is open, AMDSABLD closes the SYSPRINT file. AMDSABLD sets the return code 
and returns to the system. 
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Diagram SADMP-6. AMDSABUF — BCT/Buffer Acquisition (Part 1 of 2) 


Input Process 


Register 1 













SWAPASID 






1 Save the input parameters. 





SWAPASID 
2 \f a swap-in is in progress, 
reclaim the BCT used by the 
previous address space. 







SWAPASID 


[ 


CTBCTAVQ Queue Of Available BCT 


3 If no swap-in is in progress 
obtain a BCT for the caller. 





@ Search for a low priority 
BCT. 


Queue Of All BCT 





CTBCTALL 





e If aBCT is not found, try 
extraordinary stealing. 


e Ifa BCT is still not found, 
set a return code of 4. 


4 Prepare BCT to receive a page, 
return the BCT, and set a return 
code. 





Output 


CTBCTAVQ BCT on Available Queue 


LOWBCT BCT 
Register 15 


SAVEBACK SAVER1 








Register 15 
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Diagram SADMP-6. AMDSABUF — BCT/Buaffer Acquisition (Part 2 of 2) 
Extended Description Module Label 


AMDSABUF saves the input parameter in SWAPASID. 


If SWAPASID is nonzero, AMDSABUF assumes a swap-in is taking place and reclaims the BCT 
used by the previous address space unless: 


@ The BCT is already available. 
@ The BCT is already involved in paging. 
@ The BCT is for the swap-in address space. 


When no swap is occurring (SWAPASID =0), AMDSABUF gets a BCT for the caller and searches 
the BCT for the lowest priority BCT to steal. If AMDSABUF cannot find a low priority BCT to 
steal, AMDSABUF waits for output I/O to complete, assuming that AMDSAIOI will make some 
BCT available or stealable upon completion of output I/O processing. If AMDSAIOI does not 
provide an available or stealable BCT, AMDSABUF sets an error return code of 4. 


AMDSABUF takes the first available BCT, dequeues it, and indicates that the BCT is involved in a 
paging operation. AMDSABUF returns the BCT address as a parameter and sets a return code of 0. 
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Diagram SADMP-7. AMDSACON -— Virtual Storage Dump Console Service 





Input Process 
CTNOCONS Register 1 Message |D 
or Message 
aa sisi 2 
Address 
MSGPARMS 
as 3 
CTMSG 
ro 4 


MPSFPRES 


CTNOCONS 


MPFNOCON 


CTSCREND — 7 7 —e 5 


REQUEST 


eee 





1 Set CTCONACT to 1 to 


(Part 1 of 2) 


Output 


CTCONACT 


indicate that the console 
routine is active. 
RCODE 
If there is no working console, 
preset a return code of 8. 


REQUEST 


Get the message parameter for 
the input request. 


WRITECON 


Determine if the message should 
be written to the console or only 
included in the console message 

dump. 


Write end-of-screen message, if 


necessary. 


WRITREAD CTSCREND 


Write the message and read any 
reply. 


. 4 AMDO29D 
en : 
—— 


WRITREAD 
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Diagram SADMP-7. AMDSACON — Virtual Storage Dump Console Service (Part 2 of 2) 


Extended Description Module Label 


l AMDSACON sets CTCONACT = 1. 

2 If CTNOCONS is on, AMDSACON sets the global return code RCODE to 8. 

3 Message parameter contro] blocks (mapped by MSGPARM) describe SADMP messages. If register 1 
at entry is greater than 255, it points to a message parameter. Otherwise, register 1 contains a 


SADMP message ID, which AMDSACON uses to index into a table (MSGPARMS) of message 
parameters. AMDSACON copies the message parameter into REQUEST. 


4 Set WRITECON to 0 if: 


II 
— 
“eee” 


@ the message should be suppressed (CTMSG = 1 and MPFSPRES 
@ there is no console (CTNOCONS = 1) 


@ this message is only for the console message dump (MPFNOCON = 1) 


Otherwise, WRITECON is set to 1. 


5 AMDSACON checks if the message overflows the screen. If CTSCREND is 0, AMDSACON writes 
message AMD029D to ask the operator whether to pause and issue AMDO29D again the next time 
the screen is full. If the reply is ‘N’, AMDSACON sets CTSCREND on. Subroutine WRITREAD 


erases the screen before it writes messages. 


6 AMDSACON passes REQUEST to WRITREAD to write the message to the console and receive any 
reply. 
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Diagram SADMP-8. WRITREAD — Subroutine of AMDSACON (Part 1 of 2) 


Input Process Output 









MPWRTLEN 


SVC ———» 
Puts the message in the console {SVCDCM) 


message dump. 


O) 


Message on 
Output Tape 


lIODB Control Register 6 
pe 2 Mask off all of the devices except Control Register 6 
the CONSOLE. 
CRGESAVE 
Register 1 CTLINES 6S! 


. 


| 
py 
ha 


nt 
I 
in 
: 
: 


po Determine if the screen needs 


to be erased. If so, update the 
line count. 
Message Parm to Be Processed 
4 Obtain the screen address of the 
message. 
Channel Programs 


Oe ——————— & Build the channel program. 


CTLINES 


Message 


Perform the I/O. 


SVC 
(SVCSIO) 
7 Build the wait code and wait 
for a reply. SVC } Wait Code = '3300 nn’ 
Channel Programs (SVCSIO) nn = Message ID 


Message Parm CTC CS 8 Read the reply. 


SF 7 Reply Area 






SVC 
(SVCSIO) 


Hl 


CRESAVE Po 


Control Register 6 





case, 


iL 


Q Change the reply into upper 
0 


Restore |/O interrupt mask, 


Return to Caller 
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Diagram SADMP-8. WRITREAD — Subroutine of AMDSACON (Part 2 of 2) 


Extended Description Module Label 

1 If there is message text (MPWRTLEN is greater than 0 ), WRITREAD calls AMDSADCM to write 
the message to the output tape. 

2 WRITREAD changes the interrupt subclass mask in control register 6 to permit only console 
interrupts. This serializes all SADMP I/O until the message is complete. WRITREAD saves the 
original value of control register 6 in CR6SAVE. 

3 WRITREAD increases the count of lines on the screen. If the screen would be filled by that number 
of lines, WRITREAD sets the CCW command to ERASE/WRITE and resets CTLINES to 1. 

4 WRITREAD computes the 12/14-bit screen address from CTLINES and the known screen width 
(SW3277). 

5 The channel program sends a WRITE or ERASE/WRITE command to the console, unlocks the 
screen if a reply is expected, and furnishes the screen address and the data to be written. 

6 The 710 macro points the console IODB (XIOBCON) to the channel program and calls 
AMDSASIO. 

7 If a reply is expected, WRITREAD calls AMDSASIO to wait for an attention interrupt caused when 
the operator presses enter. 

8 WRITREAD builds a channel program to read the reply and calls AMDSASIO (Steps 5 and 6). 

9 WRITREAD converts the reply to upper case. 

10 WRITREAD restores the original value of control register 6 and returns. 
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Diagram SADMP-9. AMDSADER — DASD Error Recovery (Part | of 2) 


Input Process 





1 Locate the CCW to be restarted. 


2 Check error conditions and 
take action. 


3. Retry the I/O until it is suc- 
cessful or until the number of 
retries is exhausted, 


Issue a return code. 


SVC (SVCSIO) 


Output 


Register 15 


Page 
Buffer 


AMD0331 
AMD0O34l 
AMD0i5! 


Register 15 


“L=] 
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Diagram SADMP-9. AMDSADER — DASD Error Recovery (Part 2 of 2) 
Extended Description Module Label 
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AMDSADER locates the CCW to be restarted. IODBCSW contains the last channel program 
address returned by an J/O interrupt. If this address is not 0, it is decreased by the length of a CCW 
to obtain the address of the failing CCW. If this address is 0, the address of the last CCW started 
(IODBCCWA) is used. IODBSCSW also contains the IRB status information. 


If using a 3880-11 control unit (IODBPGST is on), the [ODB is for a paging exposure. AMDSADER 
uses IODBBASA to locate the IODB for the base exposure. This IODB must be used in all error 
recovery. 


The IRB status pointed to by IODBSCSW and the sense data pointed to by IODBSENS define the 
error and the action to be taken. 


The CCWA contains the address of the CCW that is to be retried. AMDSADER calls AMDSASIO 
to retry the I/O, and performs Steps | through 3 until the I/O is successful, or the retry count is 
exhausted. 


If the I/O succeeds, AMDSADER returns with a return code of 0. If the I/O does not succeed, 
AMDSADER writes I/O error message AMD0331 to the console and returns with a return code of 4. 
If sense data is available, AMDSADER also writes message AMDO34I. If there can be no more I/O 
with this device, AMDSADER marks the IODB as unusable (IODBUNAV = 1) and writes message 
AMDOISI. 
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Diagram SADMP-10. AMDSADIP — Virtual Storage Dump Initialization (Part 1 of 4) 














Input Process Output 
CCT Control Register 1 
1 Initialize for AMDSADIP 
cessing. 
eeeesar ty SUT SGT 
Storage for SVT PGT 
2 Turnon DAT. 
AMDSADIP 


; ; Bad Master 
.X'250100 Segment Table 
X*260200° Bad CVT 


Bad PVT 
Bad RIT 
Bad PFT 


X'260B00’ Bad RLT 
x*260C 00" No LPA 


SUT 


Storage Range 


SUT 
ae 7 


3 Check the validity of the control 
blocks used by AMDSADIP. 










4 Locate virtual storage to use 
during virtual dump execution. 
















5 Locate real page frames to use 
during virtual dump execution. 





Page Frame Table 
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Diagram SADMP-10. AMDSADIP — Virtual Storage Dump Initialization (Part 2 of 4) 


Extended Description Module Label 


AMDSADIP is the first CSECT in load module AMDSAPGE, 
the virtual storage dump program. AMDSADIP loads the 
rest of AMDSAPGE into virtual and real storage, without 
overlaying any of the information AMDSAPGE needs to 
dump real storage. 


1 AMDSADIP receives control with DAT off. 

AMDSADIP initializes the restart new PSW, the SVC 
new PSW, and the program check new PSW. AMDSADIP 
checks the validity of the segment table, and loads a wait 
state PSW if the segment table is invalid. AMDSADIP 
initializes the SUT and obtains the virtual address of 
itself. 


2 AMDSADIP turns on DAT by passing control to an 
internal subroutine DATONOFF. 


3 AMDSADIP checks the validity of the CVT, PVT, 
RIT, PFT, and RLT control blocks, and loads a wait 
state if any of the control blocks are invalid. 


4 AMDSADIP locates virtual storage for SADMP to 

use during virtual dump processing. The storage 
must be contiguous, within the same segment, in COMMON, 
and free of information that SADMP might eventually use. 
AMDSADIP tries to obtain storage from non-directory 
PLPA or ELPA. 


& AMDSADIP locates real storage frames to back the 

virtual storage that it has just obtained. AMDSADIP 
takes real storage frames from the DAT-off nucleus to use 
for the segment table for swapped-in address spaces. 
AMDSADIP saves the addresses of usable frames in the 
SUT. 
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Diagram SADMP-10. AMDSADIP — Virtual Storage Dump Initialization (Part 3 of 4) 


Input 


Parameter List 


4 Read Routine 





SUT 


A Virtual Dump 
Program 


Master DAT Tables 


RLT 





Process 


Page Frame Table 
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G6 Turnoff DAT. 


7 _‘—Read the rest of the virtual 


dump program into the fram-. 
recorded in the SUT. 


8 Build the SADMP virtual storage 
map and the SADMP real storage 
map. 


Q  Turnon DAT. 


10 Move the address constants in the 


virtual dump. 


11. Produce the virtual dump. 











Output 
Page 
SADMP Frames 
Virtual 
Storage Page Table 
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Diagram SADMP-10. AMDSADIP — Virtual Storage Dump Initialization (Part 4 of 4) 
Extended Description Module Label 


G6 AMDSADIP turns off DAT by passing control to an 
internal subroutine DATONOFF. 


7 AMDSADIP calls a subroutine in AMDSAIPL to 

read the rest of the AMDSAPGE load module, 4K 
at a time, into the real page frames. If the read routine 
fails, the read routine loads a wait state PSW. 


8 AMDSADIP builds virtual storage and real storage 
maps for SADMP use. 


Q  AMDSADIP turns on DAT by passing contro! to 
an internal subroutine DATONOFF. 


10 AMDSADIP uses the RLT and the SUT to relocate 
the address constants in AMDSAPGE. 


11 AMDSADIP calls AMDSAPGE to produce the 
virtual storage dump. 
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Diagram SADMP-11. AMDSAEXI — External Interruption Handler (Part 1 of 2) 


Input 
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Process 





Control Register 0 


oopoco40 [FTC Ys 71s Change control register O to 


disable external interruptions. 


2 Place pointer to message 


AMDO55I in general register 1. 


CTAUDPL 

eS 3 > Initialize the parameter list for 
AMDSAAUD. 

CTAUDRC 


PE F6€o. Set error reason code. 


CTAUDDMP 


CTAUDTRM 


5 Call for dump. 


G Call AMDSAAUD. 








710 MSGID 
(AMDO55!) 





?7ERROR REASON 
(ECCANCEL) 
Terminate Dump 


Output 


Control Register 0 


00B 00000 


Register 1 


TAMDO55! 


CTAUDPL=' ' 
CTAUDRC=ECCANCEL 


CTAUDDMP 


CTAUDTRM 
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Diagram SADMP-11. AMDSAEXI — External Interruption Handler (Part 2 of 2) 


Extended Description Module Label 


AMDSAPGE calls AMDSAEXI (which handles external 
interruptions), writes message AMDO551, and loads a 
disabled wait PSW. Note: AMDSAMSF handles external 
interruptions itself by modifying the external new PSW. 


1 AMDSAEX! changes control register 0, disabling 
external interruptions. 


2 AMDSAEXI calls 710 to issue message AMDO551. 
AMDSAE XI places the address of AMDO55I in 
general register 1. 


3  AMDSAEXI initializes the parameter list for 
AMDSAAUD. CTAUDPL isa field in the CCT. 


4 AMDSAEXI sets the error reason code to X‘12’. 


5 AMDSAEXI initializes CTAUDDMP and 
CTAUDTRM (which are two fields in the CCT) 
and calls for a dump. 


G AMDSAEX! calls AMDSAAUD. 
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Diagram SADMP-12. AMDSAFRM -— Storage Deallocation for Error Recovery (Part 1 of 2) 


Process Output 
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FREE and conditional request. 


UNCOND 


Register 15 


FB Call FSEARCH to free the 
storage. 


Return Code 


FSEARCH 


CTAUDRC 
X'04' =ECNOALOC 


Register 15 





e If FSEARCH fails, set an 
error code. 


?ERROR 


Register 15 


A 





6 Return with a successful return 
code. 











Wa] Jo Ayiadoig — sjeuajeyA) pasuaory 
Wg] JO SpeliayelA, payoujsay sureja07 


S861 7861 “od Wa] 1q8uUAdoD @ 7-681 I-8ZAT 


(dWAVSAWY) dung suo[y-pueis ‘p 1sidey 


eh 


C 


Diagram SADMP-12. AMDSAFRM — Storage Deallocation for Error Recovery (Part 2 of 2) 

Extended Description Module Label 
AMDSAFRM is a branch entry point for AMDSAAUD to recover storage resources not freed when 

?7ERROR causes entries to be deleted from the SVC stack. 

1 AMDSAFRM saves the passed save area address and sets up a local save area. 


2 AMDSAFRM calls 7TRACE to copy the PSW, the address of AMDSAFRM, and the SVC number 
for FRM into the trace table entry. 


3 AMDSAFRM loads the virtual address of the storage use table (SUT) into register 6 to expedite 
access to the SUT. 


4 AMDSAFRM sets FREETYPE =3 to indicate to FREE by SSINDEX, and sets off UNCOND to 
indicate a conditional free. 


5 AMDSAFRM calls FSEARCH to scan the DSCE queue for elements of allocated storage to be 
freed. If FSEARCH fails, AMDSAFRM issues a 7ERROR macro instruction to set an error code of 
X‘04’. 


6 AMDSAFRM sets a successful return code of 0 and returns to the caller. 
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Diagram SADMP-13. AMDSAGTF — GTF History Queue Dump (Part 1 of 4) 
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Diagram SADMP-13. AMDSAGTF — GTF History Queue Dump (Part 2 of 4) 
Extended Description Module Label 
1. AMDSAGTF enqueues a GTF RCB. 


2 AMDSAGTF calls ?VCHK to check the validity of AMDSAVCK ?VCHK 
the MCCE and MCOQE to determine if GTF was 

active. |f GTF was not active, AMDSAGTF sets an 

error return code of 12. If the MCQE is invalid, 

AMDSAGTFE sets an error return code of 16 and calls 

710 to issue error message AMDO18!. 710 


3 AMDSAGTF dequeues the GTF RCB. 


4 AMDSAGTF checks if the ASCB being dumped 
is for GTF. If GTF was not in this address space, 
AMDSAGTF sets an error return code of 4. 


& AMDSAGTF enqueues a GTF RCB. 


6 AMDSAGTFE dumps the GTF history queue. 
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Diagram SADMP-13. AMDSAGTF — GTF History Queue Dump (Part 3 of 4) 


Process g 


Input 
7 Check validity GTFBCB. 
e If GTFBCEB is invalid, 
set error return code 
and issue a message. 
GTFRCB 


8 Issue a successful comple- 
tion message, dequeue 
GTFRCEB, and return 


Error. Return 
to the Caller.- 


Output 


Register 15 


MSGID 


AMD825l 


MSGID 


AMD£571 


Original 
RCB 
Queue 


Register 15 


2 
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Diagram SADMP-13. AMDSAGTF — GTF History Queue Dump (Part 4 of 4) 


Extended Description 


7 AMDSAGTF calls ?VCHK to check the validity of 

the GTFBCB. If the GTFBCEB is invalid, 
AMDSAGTEFE sets an error return code of 16, calls 710 
to issue error message AMDO25I, and returns. 


8 AMDSAGTF calls 710 to issue completion message 
AMD0571, dequeues the RCB, and returns to the 
caller with a return code of Q. 


Module 


Label 


2VCHK 


210 


710 


C 
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Diagram SADMP-14. AMDSAGTM — Dynamic Storage Management (Part | of 6) 


Input Process 





1 lf SSNUM=SVCGTM, save the 
input parameters and test for 
request type. 


Register 0 Register 1 


a 





Register 0 Register 15 


[ 


2 If SSNUM=SVCGET, save the 
input parameters and test for 
request type. 


CTSUT 


GET GETLEN 
4a For GET requests: 


e If this is an unconditional 
request and too much storage 
is requested, set an error Code 
and terminate. 


UNCOND 


| 


UNCOND 

[ol] e If this is a conditional request 
and too much storage is 
requested, set an error code 
and a return code. 


Ft 53 —sLoad the SUT address. 















Output 


SUTPTR 
?ERROR 


CTAUDRC 
Error, Return 


to Caller 


CTAUDRC 


Register 15 


?ERROR 


SUBPOOLN 


SUBPOOLN 


UNCOND 


=ECBIGLEN 


=ECBIGLEN 


REQLEN1 


[ 





Wa] jo Ajtadoig — sjeLioj8jAl pasusory 
WAI JO S[BazeyA] paydisey suieju07) 


C861 7861 “di0D WAI 148UAdoD © 7-681 1-8ZAT 


(dANAGVSGWYV) dwng suoly-puris ‘py 1a}deys 


6r-V 


Diagram SADMP-14. AMDSAGTM — Dynamic Storage Management (Part 2 of 6) 
Extended Description Module Label 


1 For SSNUM=SVCGTM, AMDSAGTM saves the input parameters pointed to by register 0 and 
tests the value in register 1 to determine the request type. AMDSAGTM sets the GET field to 1 if 
register 1 contains a negative number. AMDSAGTM sets the UNCOND field to 1 because all 
R-form requests are unconditional. 


2 For SSNUM =SVCGET, AMDSAGTM saves the input parameters pointed to by registers 0 and 15. 
AMDSAGTM tests for the request type and sets the GET and UNCOND fields accordingly. 


3 AMDSAGTM loads the virtual address of the storage use table (SUT) into register 6 to expedite 
access to the SUT. 


4a For GET requests, AMDSAGTM performs GET processing. AMDSAGTM tests the requested 
length of storage. For unconditional requests for too much storage, AMDSAGTM calls 7ERROR to 
set an error code of X‘01’ and terminates. For conditional requests for too much storage, 
AMDSAGTM calls 7ERROR to set an error code of X’01’ and a return code of 4, then continues 
processing. 
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Diagram SADMP-15. AMDSAIOI — Virtual Storage Dump I/O Interruption Handler (Part 3 of 8) 


Input Process Output 






a 8 Take action on non-zero 
deferred condition codes. 


IRBFSSCH 
IRBSALRT 



















RB IRBCC =1 
IRBSPRIM a a) Deferred condition 
IRBSSEC IRBSPRIM [= 1 code 1, primary status: 








an immediate I/O 
operation with 
chaining not specified 
is complete. No action 
is taken. 


IRBCC 










(ODB IRB 


de dashacadh IRBCC b) D.C.C.1, no primary 


=0 status: prepare to 
restart the |/O. 

IRB 

oS ee) ee c) D.C.C.3: the device 
is not available. Write SVC(SVCERM)|L___> 
an error message and 
indicate the device 
is not usable. If it is 
the output device, SVC(SVCCON)F—— 
AMDSAIOI terminates 
SADMP. 
Poe 







IODB 


ees eee, ae eee Check for errors. 
9 ae (ODBERR |#0or1 
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Diagram SADMP-15. AMDSAIOI — Virtual Storage Dump I/O Interruption Handler (art 4 of 8) 


Extended Description Module Label 


8 a) The deferred condition code is valid if 
IRBFSSCH = 1, and if any of IRBSALRT, 

IRBSPRIM or IRBSSEC is 1. 

b) If RESCCWA =O, I/O does not need to be restarted. 
If RESCCWA # 0, AMDSAIOI will restart |/O later. 

c) AMDSAIO! calls AMDSAERM to issue AMDO033! 
(1/O error message, indicates deferred condition 
code of 3). If the device is the output device 
(LODBOUT = 1), AMDSAIOI issues AMDO321 to 
indicate a fatal error on the output tape, and then 
terminates SADMP with wait code X‘4FFDF1’. 


Q AMDSAIOI examines the IRB subchannel status 
(IRBSS) and device status (IRBDS) for error condi- 
tions. If any are found, AMDSAIO! sets IODBERR = 1. 
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Diagram SADMP-18. AMDSAIPL — Bootstrap Module (Part 5 of 6) 


Input Process 


Cietoev > Read AMDSAROM. 


e 
CS 
AMDSARDM — If the read fails, set reason 
code 
5 if TYPE=LO, dump real storage. 
6 If TYPE=HI, read AMDSADIP. 
e If the read fails, set reason 
code. 
“i 
= 7 Restore real storage to its original 


contents. 


8 Cal! AMDSADIP. 








FFL 


Call 
AMDSARDM 


AMDSADIP 


Output 


AMDSARDM 


WPREASON 
x‘'0800’ =WRCNORDM 


WPREASON 


=WRCNODIP 
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Diagram SADMP-18. AMDSAIPL — Bootstrap Module (Part 6 of 6) 
Extended Description Module Label 


AMDSAIPL reads AMDSARDM into the storage area that 
was just copied into SYS1.PAGEDUMP. If the read for 
AMDSARDM fails, AMDSABLD sets a wait reason code 
of X‘0800’. 


5 AMDSAIPL calls AMDSARDM to dump real storage. 
If the dump is a low speed dump, AMDSARDM does 
not return to AMDSAIPL. 


6,7 AMDSAIPL reads AMDSADIP if TYPE = HI. If the SIORTN 
read for AMDSADIP fails, AMDSAIPL sets a wait 

reason code of X’0900". If the read is successful, 

AMDSAIPL restores the contents of storage that was 

occupied by AMDSARDM. 


8 AMDSAIPL calls AMDSADIP. AMDSADIP loads AMDSADIP 


and initialized AMDSAPGE; AMDSAPGE dumps 
virtual storage. 
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Diagram SADMP-19. AMDSAMDM — Virtual Storage Dump Memory Dump (Part 1 of 4) 


Input Process Output 






CTASLB 
1 Obtain the JOBNAME for this CJOBNAME 
ASCB ; 
address space and check its 
validity. 
SVC (SVCBIN) AMDO10l 
a 2 Display the address space being 





SVC (SVCCON) VSMWORK 






4K VSMLIST 
Work Area 
Records on 
Dump Tape 






3 Obtain storage for the VSMLIST 
work area. 







ae dumped to the operator. 
CVT 










VSMLIST Program 
in MVS Nucleus 


CSCS _ © A Obtain the address ranges for the 
LSOA. 


BH Convert the VSMLIST output into 
address ranges and dump them. 


SVC (GTMSVC) 





VSMWORK 


wt 


VSMLIST 










VSMRANGE 





CTASIDA Records on Dump Tape 


eS ———__. G6 If this is the master address space, 


dump the CSA and SQA. 







VSMLIST 
VSMRANGE 
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Diagram SADMP-19. AMDSAMDM -— Virtual Storage Dump Memory Dump (Part 2 of 4) 
Extended Description Module Label 


1 AMDSAMDM obtains the jobname from ASCBJBNI 
ur ASCBJBNS. If neither field contains a valid 
jobname, AMDSAMDM substitutes “UNKNOWN. 


2 AMDSAMDM calls AMDSABIN to convert the 
ASCB address and ASID to EBCDIC, then writes 
message AMDO101 to the console. 


3 AMDSAMDM issues a GETMAIN for 4K of subpool 
104. VSMLIST uses this as a work area. 


4 AMDSAMDM issues a VSMLIST macro call to put 
address ranges for the LSQA of the current address 
space into the VSMLIST work area. 


= AMDSAMDM calls internal subroutine VSMRANGE. 

VSMRANGE processes the output from VSMLIST. 
VSMRANGE calls AMDSAARD (via an SVC macro) for 
each block of storage that VSMLIST identifies, and passes 
the length and address of each block to AMDSAARD. 
AMDSAARD accumulates these storage ranges and dumps 
the associated storage. 


G@ If CTASID=1, AMDSAMDM issues VSMLIST macros 
for CSA and SQA, then calls VSMRANGE. 


Wal Jo Ajsodorg — s[bisajyeyy pasuacry] 


WAI JO S[BUazBYy payd1jsay SaiBj}U0> 


OBO] Sply 2d1arag ainioaiyory pepurxg/SAW Q/-p 


” 
»< 
wm 


C861 7861 “di0og Way 14y8uAdod © 7-681 1-8Z7AT 


Diagram SADMP-19. AMDSAMDM — Virtual Storage Dump Memory Dump (Part 3 of 4) 


Input 


J 


DT 


| 


CTASIDD 


Process 


Dump Table 


7 Search each entry in the dump 
table for the following conditions: 


The current ASID is in the 
ASID list. 


CJOBNAME 


I 


ASXBLTCB 





: 
© 
mw 

rd 


@ The current JOBNAME is in 
the JOBNAME list. 


The protect key of the 
memory’s RCB is in the key 
list. 


| 


8 If any of the above conditions 
are found, do the following: 


@ Dump the address ranges in 
the address list. 


e Dump the subpools in the 
subpool list for every TCB in 
this memory. 


Return to Caller 





G 


SVC (SVCARD 


TCBSCAN 


Output 


PT 


JOBNAME IB+ 
Key List 
Address List 


Subpool List 


VSMWORK 


VSMLIST 
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Diagram SADMP-19. AMDSAMDM -— Virtual Storage Dump Memory Dump (Part 4 of 4) 
Extended Description Module Label 


7 =‘ The dump table (DTABLE, that the CTDT points to) 

contains lists of sublists that specify storage to be 
dumped (by subpool number or address range) in address 
spaces (by ASID, jobname, or TCB key}. AMDSAMDM 
searches each sublist to determine if one of the following 
three conditions is met: 


@ The address space currently being dumped is in the 
ASID list. 


@ The jobname for the address space currently being 
dumped is in the jobname list. 


@ The protect key of the memory’s TCB for the address 
space currently being dumped is in the key list. 


If the address space meets the criteria that the dump table 
specifies, AMDSAMDM dumps the necessary storage. |f 
address ranges were specified, AMDSAMDM calls 
AMDSAARD (via an SVC macro) to dump the address 
ranges. If subpools were specified, AMDSAMDM calls 
TCBSCAN to dump the subpools in the subpool list for 
each TCB in this address space. 
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Diagram SADMP-20. AMDSAMSF — Console Loop Trace Buffer Dump (Part 1 of 6) 


Input 


MSFRCB RCB Queue 


| 





FLCENPSV® Control Register 0 


[ 


2 
PSW 
CPUAD 
a oo 


Register 1 


BCT 
Buffer 


| 


‘ 








Enqueue the MSF RCB. 


Determine whether execution is 
on a VM machine. 


Issue a SIGP SENSE to ceter- 
mine if a particular processor 
is online. 


Obtain a BCT with a buffer. 


Initialize the data block and the 


command word for MSSFCALL. 


c 


SVC (SVCBUF) 


CPUVERSN 


CNTLROSV 


C 


MSFDBLK 
eens! 


MSFDBLNG 


RCB Queue 


SAVENPSW 


SYSMSKSV 


Buffer 
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Diagram SADMP-20. AMDSAMSF — Console Loop Trace Butfer Dump (Part 2 of 6) 
Extended Description Module Label 


1 AMDSAMSF enqueues the MSF RCB onto the RCB 
queue. 


2 AMDSAMSF stores the processor identifier, to AMDSAMSF 
determine whether or not execution isona VM 

machine. |f execution is not on a VM machine. 

AMDSAMSF saves its environment. Otherwise, 

AMDSAMSF passes control to step 12. 


3 AMDSAMSF issues SIGP instruction to a particular 

processor to determine if the processor is on fine. 
If it is on line, AMDSAMSFE continues processing. If the 
processor is not on tine, AMDSAMSF does not perform 
steps 4 through 9. 


4 AMDSAMSF obtains a buffer control table (BCT) 
entry and its associated buffer by passing control 

to AMDSAMSF via an SVC instruction. If AMDSAMSF 

cannot obtain a buffer, it passes control tostep 11. 


F, AMDSAMSF clears the BCT buffer for use as the 

MSSFCALL data block. It saves the length of the 
data block in the block. AMDSAMSF initializes the 
MSSFCALL command word s0 that a read console 
loop trace command is issued to the MSSF. 
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Diagram SADMP-20. AMDSAMSF — Console Loop Trace Buffer Dump (Part 3 of 6) 


Input Process 


R4 ——® MSFDBLK 


a Issue a SERVICE CALL or 
RS MSSFCALL DIAGNOSE 


MS FCMDWD instruction, 


a. First, issue the 
SERVICE CALL. 


b. If the SERVICE CALL 
encounters a program 
check, issue an 


Control Register Oo MSSFCALL DIAGNOSE. 


eS J =Prepare ‘to receive the MSSF 


external interrupt. 


SAVENPSW CNTLROSV 
8 If the interrupt is received, 
SYSMSKV prevent further MSSF external 


interrupts from arriving. 


Output 


MSFDBLK 


ai 
MSF DBRSP 


Console Loop 
Trace Data 


Control Register 0 


[| 


FLCENPSW 


PSW 


Control Register 0 


|_| 


FLCENPSW 
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Diagram SADMP-20. AMDSAMSF — Console Loop Trace Buffer Dump (Part 4 of 6) 
Extended Description Module Label 
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AMDSAMGSF passes the command word and the address of the data block in registers that the 
SERVICE CALL and DIAGNOSE instructions use. AMDSAMSF issues the SERVICE CALL or 
MSSFCALL DIAGNOSE instruction to obtain the console loop trace buffer. It issues SERVICE 
CALL first; if SERVICE CALL encounters a program checks, it then issues MSSFCALL 


DIAGNOSE. If AMDSAMSF is successful, the console loop trace is stored in the data block passed 
to the MSSF. 


AMDSAMSF changes the new external interrupt PSW (FLCENPSW), which passes control to 
EIHANDLER in AMDSAMSF when an external interrupt occurs. AMDSAMSF modifies contro] 
register 0 to allow MSSF external interrupts and modifies the PSW to enable for external interrupts. 
It then goes into a spin loop to wait for the interrupt. If the TOD clock value is usable, 
AMDSAMESF waits a maximum of 60 seconds for the interrupt. If no interrupt occurs, AMDSAMSF 
stops attempting to obtain the console loop trace and passes control to step 11. If the TOD clock is 
not usable, AMDSAMGSF is in an endless spin loop. 


The MSSF interrupt occurred. AMDSAMSF restores the original contents of the new external EIHANDLER 


interrupt PSW and control register 0. It then disables the PSW to prevent further MSSF external 
interrupts. 
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Diagram SADMP-20. AMDSAMSF — Console Loop Trace Buffer Dump (Part 5 of 6) 


Input Process Output 


MSFDBLK Dump Data Set 


MSFDBRSP Q Write the buffer containing 


| 


the console loop trace toa Page Containing 
dump data set. Console Loop 
SVC (SVCSIO) Trace Data 
1Q Return to step 3 if additional 
processors are online. 
SAVENPSW CNTRLROSV FLCENPSW Control Register 0 


11. Restore original environment. 
SYSMSKSV PSW 
RCB Queue 
MSFRCB 


TY 12 Dequeue the MSF RCB. 


Original RCB Queue 


=4n 28 
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Diagram SADMP-20. AMDSAMSF — Console Loop Trace Buffer Dump (art 6 of 6) 


Extended Description Module Label 


9 _siif the data block contains console loop trace data 

pass control to AMDSASI!O via an SVC instruction. 
AMDSASIO writes the buffer containing the console loop 
trace to the dump data set. 


10 |f more processors are online, AMDSAMSF returns 
to step 3. 


11. AMDSAMSF restores its environment to allow 
AMDSADMP to function normally. 


12 AMDSAMSF dequeues the MSF RCB from the RCB 
queue. 
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Diagram SADMP:21. AMDSAOSG — One-Step Generation (Part 1 of 16) 


Input Process 





SSSRBPTR 1 Initialize the DYNALLOC 
model request block. 


2 Call DYNALLOC to allocate 
GENPRINT. 


— If the allocation fails, set 
an error return code and 
terminate. 


lf the allocation is successful, 
call |O to open GENPRINT. 


3 Call |O to open GENPARMS. 


— If the open fails, call |ONOPEN 
to write an error message. 





Error. Return 
to the Caller. 


Output 
S99RBPTR 


Register 15 


IORECA 


AMDO35l 
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Diagram SADMP-21. AMDSAOSG — One-Step Generation (Part 2 of 16) 


Extended Description Modal Label 


AMDSAOSG generates a SADMP program that can be 
IPLed. 


1 AMDSAOSG sets the request block pointer to the 
request block and initializes the DYNALLOC model 
request block. 


2  AMDSAOSG calls DYNALLOC to dynamically 

allocate GENPRINT. If the allocation fails, 
DYNALLOC sets an error return code of 4 and terminates 
abnormally. If the allocation is successful, AMDSAOSG 
calis !|O to open GENPRINT. 


3 AMDSAOSG calls 1O to open GENPARMS. If the 
open fails, |O calls JONOPEN to write error message 
AMD0O35}. 
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Diagram SADMP-21. AMDSAOSG — One-Step Generation (Part 3 of 16) 


4 Call DYNALLOC to allocate 
SYSIN. 


Input Process 


e If the allocation fails, set an 
error return code and call 
[O to write an error message. 


e lf the ailecation is successful, 
call }O to open SYSIN. 


e If the open fails, call LONOPEN 
to write an error message. 





DYNALLOC 


Output 


Register 15 


IORECA 
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Diagram SADMP-21. AMDSAOSG — One-Step Generation (Part 4 of 16) 
Extended Description Module Label 


4 AMDSAOSG calls DYNALLOC to dynamically 

allocate SYSIN. If the allocation fails, DYNALLOC 
sets an error return code of 4 and calls |O to write error 
message AMDO63l. If the allocation is successful, 
AMDSAOSG calls 1O to open SYSIN. If the open fails, 
lO calls |ONOPEN to write error message AMDO35I. 
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Diagram SADMP-21. AMDSAOSG — One-Step Generation (art 5 of 16) 


Input Process 


GENPARMS 
a se es 5 Call IO to generate AMDSADMP 


macro input and to copy 
GENPARMS. 


6 Call 10 to close SYSIN and 
GENPARMS. 


7 Call DYNALLOC to allocate 


SYSLIB, SYSUT1, and SYSPUNCH. 


e If the allocation fails, set an 
error return code, call 10 to 
write an error message, and 
terminate. 





DYNALLOC 


Error. Return 
to the Caller. 


Output 


Register 15 


IORECA 


AMD063I 
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Diagram SADMP-21. AMDSAOSG — One-Step Generation (Part 6 of 16) 
Extended Description Module Label 


5 AMDSAOSG calls 10 and generates input for the 
assembler. Input received from MACVSET1 and 
MACVSET2 instruct AMDSADMP to invoke AMDSADM2 

directly for one-step generation. 


G AMDSAOSG calls!O to close SYSIN and GENPARMS. 


J AMDSAOSG calis DYNALLOC to allocate SYSLIB, 

SYSUT1, and SYSPUNCH. If any of the allocations 
fail, DYNALLOC sets an error return code of 4, calls |O 
to write error message AMDO63l, and terminates 
abnormally. 
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Diagram SADMP-21. 


[nput 


AMDSAOSG — One-Step Generation (Part 7 of 16) 


8 Call RALSVSP to allocate SYSPRINT. 


e If allocation fails, set an error 
return code, call |O to write 
an error message, and terminate. 


Error. Return 
to the Caller. 


DYNALLOC 


Register 15 


IORECM 


AMD 0631 
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Diagram SADMP-21. AMDSAOSG — One-Step Generation (art 8 of 16) 
Extended Description Module Label 


8 AMDSAOSG calls RALSYSP to allocate SYSPRINT 
for the assembler. RALSYSP calls DYNALLOC. 

If the allocation fails, DYNALLOC sets an error return 

code of 4, calls 10 to write error message AMDO63I, 

and terminates abnormally. 
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Diagram SADMP-21. AMDSAOSG — One-Step Generation (Part 9 of 16) 


Q Assemble the AMDSACCT and 

AMDSARDM modules and 
GENPRINT ANDSAOSG parameter 
statements. 


Input Process 


e If the assembly is successful, 


Assembler call COPYPRNT. 
Listing 


e lf the assembly fails, set an 
error return code, call 1O to 
write an error message, and 
terminate. 


O10] Sply VdIAIag aINIDaIIYOIY PepUurrxa/SAW 7Z6-p 


1Q Call 10 to open, read, and close 
SYSPUNCH. 


e If the open fails, call |ONOPEN 
to write an error message. 


11 Cal! DYNALLOC to allocate 
IPLTEXT, PGETEXT, IPLDEV, 
and TRKOTEXT . 


e If any of the allocations fail, 
set an error return code, call 
|O to write an error message, 
and terminate. 
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Assembler 
Listing 
Register 15 


oe. —<$——$——— 


Error. Return 
to the Caller. 







DYNALLOC ; 


Error. Return 
to the Caller. 
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O 
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[PETYPE 
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IPLUNIT 
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lIORECA 
AMDO35l 


Register 15 


O 
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Diagram SADMP-21. AMDSAOSG — One-Step Generation (Part 10 of 16) 
Extended Description Module Label 


Q AMDSAOSG assembles the AMDSACCT and 
AMDSARDM modules and the AMDSAOSG pdram- 
eter statements by linking to the assembier. If the assembly 
is successful, AMDSAOQOSG calls COPYPRNT to copy the 
assernbler listing to the end of GENPRINT. If the assembly 
fails, AMDSAOSG sets an error return code of 4, calls 1O 
to write error message AMDOQ64I, and terminates 
abnormally. 


1Q AMDSAOSG calls |O to open SYSPUNCH. If the 

open fails, |O calls '|ONOPEN to write error mes- 
sage AMDO35I. 10 reads the parameter statements from 
the AMDSADMP output in SYSPUNCH. AMDSAOSG 
generates the AMDSABLD input parameter, the IPL unit 
class, the IPL unit type, the IPL serial number, and the 
ICKDSF input statements. AMDSAOSG calls 10 to 
close SYSPUNCH. 


11 AMDSAOSG calls DYNALLOC to allocate |IPLTEXT 


for AMDSABLD and ICKDSF, to allocate PGETEXT 
for AMDSABLD, to allocate IPLDEV for AMDSABLD and 


ICKDSF, and to allocate TRKOTEXT for AMDSABLD and 
ICKDSF. If any allocation fails, DYNALLOC sets an error 
return code of 4, calls |O to write error message AMDO631, 
and terminates abnormally. 
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Diagram SADMP-21. AMDSAOSG — One-Step Generation (Part 11 of 16) 
Input Process 


12 Call RALSYSP to reallocate 
SYSPRINT. 


e if the allocation fatis, set an 
error return code, call |O 
to write an error message, 
and terminate. 


GENPRINT 


AMDSABLD 
SYSPRINT 


Data Set 13. Link to AMDSABLD. 


Assembler e If successful, calli 


Listing COPYPRNT. 


e If AMDSABLD fails, set an 
error return code, call |O 
to write an error message, 
and terminate. 





Output 


RALSYSP DYNALLOC 


IORECA 
/ 10 [| ampoesi 
Error. Return 
to the Caller. 









GENPRINT 





Assembler 


COPYPRNT [__ Listing 
AMDSABLD 
SYSPRINT 
Data Set 
Register 15 


IORECA 
| 10 | AMDO64! 


Error. Return 
to the Caller. 
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Diagram SADMP-21. AMDSAOSG — One-Step Generation (Past 12 of 16) 
Extended Description Module Label 


12 AMDSAOSG calls RALSYSP to reallocate SYSPRINT 

for AMDSABLD. RALSYSP calls DYNALLOC. If 
the allocation fails, DYNALLOC sets an error return code 
of 4, calls |O to write error message AMDO63lI, and 
terminates abnormally. 


13 AMDSAOSG links to AMDSABLD. If the IPL unit 
is tape, the link initializes the SADMP residence 
volume. if the IPL unit is DASD, AMDSAOSG uses 
ICKDSFE to initialize track 0. If the link is successful, 
AMDSAOSG calls COPYPRNT to copy the AMDSABLD 
printed output to the end of GENPRINT. If AMDSABLD 
fails, AMDSAOSG sets an error return code of 4, calls 
1O to write error message AMDOG64I, and terminates 
abnormally. 
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Diagram SADMP-21. AMDSAOSG — One-Step Generation (Part 13 of 16) 


Input Process 


IPLTYPE 14 For a DASD IPL: 


a. Call 1O to open, read, and 
close SYSIN. 


— If the open fails, call 
IONOPEN to write an 
error message. 


. Call RALSYSP to reallocate 
SYSPRINT. 


If allocation fails, set an 
error return code, call 
iO to write an error 
message, and terminate. 





Output 


| RALSYSP 
| 10 


Error. Return 
to the Caller. 


IORECA 


DYNALLOC 


Register 15 


JORECA 


AMDO63!I 





Wal Jo Aqiadoig — syeLiajeyA, posuacry] 


WAI JO S[BLiajy¥yA, payILsey suieju07 


C861 7861 “Lod WAI 198UAdOD © 7-681 I-8ZAT 


(AWAVSAWY) dung suo[y-puris “p 19}deq5 


L6-v 


C 


Diagram SADMP-21. AMDSAOSG — One-Step Generation (Part 14 of 16) 
Extended Description Module Label 


14 a. For DASD IPL units, AMDSAOSG calls IO to 
open SYSIN. If the open fails, 10 calls IONOPEN 
to write error message AMDO351. if the open is 
successful, AMDSAOSG calls [IO to copy the 
ICKDSF parameters into SYSIN, and close SYSIN. 


b. AMDSAOSG calls RALSYSP to reallocate 
SYSPRINT for DSF. RALSYSP calls 
DYNALLOC. If the allocation fails, 
DYNALLOC sets an error return code of 4, 
calls 10 to write error message AMDOG3I, 
and terminates abnormally. 
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Diagram SADMP-21. AMDSAOSG — One-Step Generation (Part 15 of 16) 


Input 


GENPRINT 


Assembler 
Listing 


AMDSABLD 
SYSPRINT 
Data Set 





c. Link to ICKDSF. 
If successful, call COPY DSFP. 


Process 


If ICKDSF fails, set an error 
return code, call |O to write 
ICKDSF an error message, and 
SYSPRINT terminate. 
Data Set 
Error. Return 
to the Caller. 


15 Call lO to write a completion 
message and to set areturn 
code. 


{G6 Close and deallocate files, and 
return, 


Return 
to Caller. 


Register 15 


[| 


GENPRINT 


Assembler 
Listing 


AMDSABLD 
SYSPRINT 
ICKDSF 
SYSPRINT 
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Diagram SADMP-2!1. AMDSAOSG — One-Step Generation (Part 16 of 16) 
Extended Description Module Label 


14 ¢- AMDSAOSG links to ICKSDF. If the link is 
successful, AMDSAOSG calls COPYDSFP to 
copy the printed output from ICKDSF to 
the end of GENPRINT. If ICKDSF fails, 
AMDSAOSG sets an error return code of 
4, calls 10 to write error message AMD0641, 
and terminates abnormally. 


15 AMDSAOSG calls 10 to write successful com- 
pletion message AMDO062I, and sets a return code 
of 0. 


16 AMDSAOSG closes and deallocates the files and 
returns, 
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Diagram SADMP-22. AMDSAPGE — Virtual Storage Dump Initialization and Control (Part 1 of 8) 






Input Process Output 





SUT in SADMP 
CTSUT Load 


1 Initialize the SUT. ae Module 


FLCPNPSW 

FLCMNPSW 
CTAUDRCR=ON 
CTAUDIOX=ON 


SUT in Page 0 
— z 


2 Initialize the program and 
machine check handlers and 
the error recovery. 





ARDDATA 
ARDDATA 
> «3 Initialize the ARB queue. 
a ae ARDLAST 
XIODBCON XIODBOUT  AMDSAIO! ea 
PO ED CF 4 initiating the 0 service FLCINPSW Control Register 6 
[| | (D8 Queue 
5 Initialize the SADMP trace 
cable: CTIODB 
AMDSASVI 
PY Initialize the SVC interrupt SEU Unees 


— 


handler. 


FLCSNPSW 


eel 


SVCSTAT 












CTSVCSTV 
CTSVCSTR 


PGOSVCRT 
OAFC SVC 
Stack 
(Empty) 
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Diagram SADMP-22. AMDSAPGE — Virtual Storage Dump Initialization and Control (Part 2 of 8) 


Extended Description Module Label 


1. Entry point AMDSAPGE in the CS9ECT AMDSAPGE 
initializes the virtual dump program and controls its 
execution and termination. 


2 ~The program new PSW points to module AMDSAPGI. 

The machine check new PSW is a disabled wait PSW 
with code X‘370000’. After initialization, any successful 
system restart causes AMDSAPGE to reinitialize SADMP 
beginning with this step. System restart is not permitted 
during SADMP initialization. The restart new PSW points 
to AMDSARST, which reloads the restart old PSW. 


3 AMDSAPGE sets the address range block (ARB) queue 
header in ARDDATA to zero. The ARB queue 
header is the last and only ARB in the queue. 


4 = Thet/Onew PSW points to AMDSAIOI. AMDSAPGE 

builds the |ODBs and their related control blocks 
using the information found in the CCT. AMDSAPGE 
disables the IPL subchannel and sets control register 6 to 
permit interruptions from the output tape but not the 
console. 


5 SADMP uses the second page of the AMDSAPGE load 

module for its trace table. AMDSAPGE clears the 
page, puts ‘TRCT’ into the header, and sets the current 
index to zero. 


6 siThe first virtual page after the AMDSAPGE load mod- 

ule is used for the SVC stack. AMDSAPGE clears the 
page, puts 'SVCS' into the header, and sets the current 
index to zero. 
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Diagram SADMP-22. AMDSAPGE — Virtual Storage Dump Initialization and Control (Part 3 of 8) 


Input 








Process ¥ 


7 Initialize the external interruption. 
handler. 


8 Initialize dynamic storage 
management. 


Q Initialize swap-in and real 
storage management. 


10 initialize 1/O page buffers. 


11. Initialize the system restart 
interruption handler. 


Output 


FLCENPSW PGOSVCEX 


Control Register 0 


32) 
i 
=| 





BCT Queue 


CTBCTALL 
CTBCTAVQ 


Page 
Buffers 


FLCRNPSW 


es 
_—<—— 
fe | 
SAT 


DSCE Pages 





Table 


PGOSVCSR 


OAIC 
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Diagram SADMP-22. AMDSAPGE — Virtual Storage Dump Initialization and Control (Part 4 of 8) 


C 


Extended Description 


10 


1] 


The new external interrupt PSW points to an SVC in page 0 so external interrupts are converted into 
SVC interrupts. Only console interrupts are enabled. 


The next two unallocated pages are set aside for the dynamic storage control elements (DSCE). The 
next 16 pages, following the DSCE, are set aside for SADMP dynamic storage. Each of the 16 pages 
is mapped by one DSCE. These DSCEs are placed on the DSCE in-use queue. The rest are placed 
on the DSCE available queue. 


The swap address table (SAT) contains the real and virtual addresses of the following areas that 
SADMP uses to swap-in ap address space: the page tables for segment 0 and the top segment, the 
segment table (allocated from previously unallocated SADMP storage), and SADMP’s own page ~ 
table. The CCT points to the SAT and the RAD. 


SADMP storage that is still unallocated is used for SADMP page buffers and the BCTs that support 
them. The BCTs are queued together in the BCT available queue or the queue of all BCTs. 


The restart new PSW points to an SVC in page 0 by which a system restart is converted into an SVC 
interrupt. 
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Diagram SADMP-22. AMDSAPGE — Virtual Storage Dump Initialization and Control (art 5 of 8) 


Input Process Output 


12 Call AMDSADMP to enable for 


dumping. svc 


(SVCPGE) 


13 Initialize the RCB and save 
area stacks. 


CT3480 


14 = Assign 3480 tape drive if used 
for output. 


SVC 
'(SVCSIO) =, 


SVC 
(SVCCON) y AMDge9! 
?Error ; SVC L disabled wait 
Terminate 7 (SVCAUD 7 PSW 


15 Dump the console loop trace 


buffer. RCB 
(SVCMSF) 
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Diagram SADMP-22. AMDSAPGE - Virtual Storage Dump Initialization and Control (Part 6 of 8) 


Extended Description Module Label 


12 AMDSAPGE becomes enabled for !/O and external 
interrupts. This SVC puts the fIrst entry into 
the SVC stack. 


13 The save area pointer is set to zero. The AMDSAPGE 

RCB defines error recovery for the remainder of 
AMDSAPGE and serves to end error recovery percolation 
since it is the last RCB on the RCB queue. The AMDSAPGE 
RCB causes the virtual dump to terminate with an error 
code that indicates the segment of AMDSAPGE last in 
control. 


14 \f the output device is a 3480 tape drive, AMDSAPGE 

attempts to assign the tape drive. If the assign com- 
mand fails to assign path groups, AMDSAPGE issues mes- 
sage AMDO69I and terminates SADMP. 


15 AMDSAPGE calls AMDSAMSF (via an SVC macro) 
to dump the console loop trace buffer. 
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Diagram SADMP-22. AMDSAPGE — Virtual Storage Dump Initialization and Control — (Part 7 of 8) 


Input 








Process Output 


Initialize the ASM function by 
checking the validity of the ASM 


control! block. DTAB 
CTDT 
Initialize the dump table. Lon _ 
Process the dump tailoring _L 
options. - 
CCT XSD 


Initializes the extended storage 7 || 
function by checking the 


validity of the EST and AMD072I 
initializing the SADMP XSD., c 3 
a. Dump each address space. & Tape 
SVC (SVCAID) : 

b. Unload the output tape. & Tape 

‘210 

AMDO056l 

Notify the operator that the Tape 
virtual dump is complete. 

710 Wait PSW 


X’410000' 


Write remaining console 
message dump buffers. 


SVC (SVCDCM) Console messages 


22 Unload the output tape. Tape on output tape. 


710 


U c 
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Diagram SADMP-22. AMDSAPGE — Virtual Storage Dump Initialization and Control (Part 8 of 8) 


Extended Description Module Label 


16 AMDSAPGE checks the validity of the ASM control blocks, the ASMVT, the ASVT, and the 
PART. If the ASVT control blocks are invalid, AMDSAPGE cannot perform paging operations, so 
AMDSAPGE terminates. If the ASMVT or PART is invalid, AMDSAPGE continues processing; 
however, it does not dump virtual storage from page data sets. AMDSAPGE also checks the validity 
of the SART. If the SART is invalid, AMDSAPGE continues processing; however, it does not dump 
swapped-out address spaces. 


17. AMDSAPGE obtains storage for the dump table, and initializes the dump table to request dumping 
of subpools 229, 230, 236, and 237 in all address spaces. 


18 AMDSAPGE calls AMDSAPMT (via an SVC macro) to fill in the dump table using the dump 
tailoring options. 


19 AMDSAPGE checks the validity of the MVS extended storage table (EST). If it is valid, 
AMDSAPGE initializes the SADMP extended storage descriptor (XSD). If it is not valid, 
AMDSAPGE writes message AMD072I. 


20 AMDSAPGE calls AMDSAAID (via an SVC macro) to dump each address space. 
Zi AMDSAPGE issues message AMDOSO6I. 


22 AMDSAPGE calls AMDSADCM to write any remaining console message dump buffers to the 
output tape. 


23 AMDSAPGE waits for the output tape to finish, then unloads the tape. If the output is to a 3480 
drive, AMDSAPGE writes a display message to the tape drive indicating that SADMP has completed 
processing. Also, if the output device is a 3480 tape drive, AMDSAPGE attempts to unassign the 
tape drive. Then, in all cases, AMDSAPGE loads a wait state PSW with an address of X‘410000’. 
This notifies the operator that the virtual storage dump completed successfully. 
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Diagram SADMP-23. AMDSAPGI — Virtual Storage Dump Program Check Handler 


Program Interrupt 


Input 





PGIINUSE 


oe 


FLCPOPSW 


Program Old PSW 


| 


FLCPICOD 


| 
| 


Program Interrupt Code 
FLCTEA 


| 
| 


PGOPGISA 


[| 


F_LCPOPSW 


| 
| 


CTAUDPCE 


FLCPICOD 


| 





Process 


1 Save the registers in page 0. 


If a program check occurs in 
AMDSAPG| itself, terminate. 


Puts a program interrupt 
entry into the trace table. 


If a page or segment error occurs: 


@ Puta translation exception 
entry into the trace table, 
showing the faulting address. 


@ Restore the registers, trace 
the exit from the interrupt 
handlers, and simulate an 
SVC interruption to 
AMDSAUPD. 


In case of an expected program 
check or an addressing exception: — 
recover without requesting a dump. 


(Part 1 of 4) 


Output 


Load a disabled 


wait PSW 
X‘4FFEFF’ 





AMDSAUPD 


AMDSAAUD 


= New Entry 


TRCT 


BE 
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Diagram SADMP-23. AMDSAPGI — Virtual Storage Dump Program Check Handler (Part 2 of 4) 
Extended Description Module Label 


Several types of program checks can occur. Program checks in AMDSAPGI are severe errors causing 
immediate termination. Translation exceptions are normal, and handled by converting the program check 
into an apparent SVC interrupt. Expected program checks or addressing exceptions are normal. 
AMDSAPGI treats other program checks as SADMP errors that require cautious recovery and possibly 
abnormal termination. 


l AMDSAPGI copies the entry registers into page 0 (PGOPGISA). 


2 If the program check ts recursive (PGIINUSE = 1), AMDSAPGI terminates immediately by loading 
a disabled wait. If it is not recursive (PGIINUSE = 0), AMDSAPGI protects against recursion by 
setting PGIINUSE = 1. 


3 AMDSAPGI records the program check (program old PSW and trace ID) in the SADMP trace table 
(CTTRACE). 


4 If the interrupt is a translation exception (segment or page fault, FLCPICOD = X‘0010’ or X‘0011’), 
AMDSAPGI also records the faulting address (FLCTEA) in the trace table by putting it into a 
dummy PSW. AMDSAPGI simulates an SVC call to AMDSAUPD by the copying program-check 
old PSW (FLCPOPSW) to the SVC new PSW (FLCSOPSW), placing the SVC number for 
AMDSAUPD into the SVC interrupt code (FLCSVCN), reloading the entry registers, and loading 
the SVC new PSW (FLCSNPSW). AMDSAPGI also traces the exit from AMDSAPGI. 


5 If the program check is an addressing exception (PIC = 5) or the program-check was expected, 
AMDSAPGI sets the recursion lock PGIINUSE and the program-check-expected flag CTAUDPCE 
to 0, and calls AMDSAAUD to give control to the top RCB exit. 
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Diagram SADMP-23. AMDSAPGI — Virtual Storage Dump Program Check Handler (Part 4 of 4) 


Extended Description Module 


6 For all other program checks, AMDSAPGI calls for a dump (CTAUDDMP = ON), asks for 
recovery (CTAUDRCV = ON), and calls AMDSAAUD. 


Label 
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Diagram SADMP-24. AMDSAPMT — Interactive Prompting for Dump Options (Part 1 of 2) 








Input Process Output 
CTGENDTO AMD9O60! 
Po Dump Options Dump Table Error Message 
CTDT from SADMP — 
Generation 1 Parse and translate the dump .New Dump Options 
options passed from the TO 
Dump Table —  f——> SADMP generation. SVC (SVCPRS) 
Translated Commands from Parser 
2 Request additional dump P| P| S| 
options from the operator, 
CTPROMPT then parse and translate SVC (SVCPRS) AMDO59D 
PRSUINE 
Bo 3 Correct syntax errors in the AMDO60I — Error Message 
AMDO6S5A — Correction Prompt 


command. 


Dump Table 
4 If the command is DUMP, 
add more dump options to the 
dump table. 





Translated Command 
5 If the command is LIST, list 

| || a the current dump options. 
§ If the command is not END, 


P| P| prompt the operator. 


7 ‘If the command is END, 
begin dumping. 


AMD0O67I and the 
contents of the 
dump table. 


O) | fC 








Wal jo Ajsadoig — sjeiiaj}8]AQ] pasuaory 
WA] JO SYBLI9} BJA, P2}9!11}S0y SUlB}UO’) 


C861 Z861 “dod Wa] 1ysuAdoD © 7-6811-8ZAT 


(dNAVSAWY) dung su0ly-pueis “p roideyD 


Clip 


C C 


Diagram SADMP-24. AMDSAPMT — Interactive Prompting for Dump Options (Part 2 of 2) 


Extended Description Module Label 


1 If CTGENDTO is nonzero, CTGENDTO points to 

the dump options text entered during SADMP gen- 
eration. AMDSAPMT calls AMDSAPRS to translate it 
into a dump option set (pointed to by PTHPTR)}), then 
compresses the dump option set into a dump table that 
the CTDT points to. 


lf CTGENDTO is zero, this indicates that AMDSAPMT 
has no dump options next to translate. 


2 If CTPROMPT=ON, AMDSAPMT writes message 

AMDOSSD to prompt the operator for more dump 
options. AMDSAPMT reads the reply from the console 
into PRSLINE, then passes PRSLINE to AMDSAPRS to 
have it parsed and transiated. 


3 SCA the return code from AMDSAPRS is nonzero, an 

error exists in PRSLINE. AMDSAPMT writes mes- 
sage AMDOQ6OI to show the syntax error, AMDSAPMT 
repeats PRSLINE and underlines the text that is in error. 
AMDSAPMT writes message AMDO6SA to ask the 
operator to correct the error. AMDSAPMT reads the 
operator’s correction and inserts it into PRSLINE in 
place of the asterisked text. AMDSAPMT continues 
until PRSLINE is free of syntax errors. A return code 
of 0 from AMDSAPRS indicates no more errors in 
PRSLINE. 


4 AMDSAPNT calls internal subroutine COMPRESS 

to compress the dump option set into a list, which 
it appends to the end of the dump table that the CT DT 
points to. 


5 AMDSAPMT calls internal subroutine LISTDT to 

write message AMDO67I to the console, then 
expands the dump table entries into an EBCDIC form 
that agrees with the dump options syntax. 


6,7 If the command is END, AMDSAPMT exits; 
otherwise AMDSAPMT reprompts the operator. 
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Diagram SADMP-25. AMDSAPRS — SADMP Parsing and Translation (Part 1 of 2) 


Input Process 





Parameter List 1 Convert the input text into a 


table of tokens. 


2 Parse and translate the token 

table into a parse-translation 
header (PTH) and possibly a 
dump option set. 


3 If the syntax of the input is 
correct, return the PTH to 


TKTABLE the caller. 


ppp fF —*) If the syntax of the input is 


In error, return the bounds 
of the first token in error 
to the caller. 











Output 


TKTABLE 


OUTERBEG 


OUTEREND 


[ 
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Diagram SADMP-25. AMDSAPRS — SADMP Parsing and Translation (Part 2 of 2) 


Extended Description Module Label 


1. Subroutine LEXSCAN converts the input text 
(INPLINE) into a token table (TKTABLE) by 

eliminating blanks and replacing keywords with 1-byte 

symbols. LEXSCAN also does syntax checking. 


2 Subroutine PARSE uses a stack (PSTACK) and a 

BNF grammar to check the syntax and translate 
the token table into a dump options set (DOS) pointed 
to by a PTH. If there was a syntax error, PARSE 
indicates which token was the first to be detected in 
error. 


3,4 The returned pointer to the PTH is OUTPTHP. 
The bounds of the token in error, as they appear 
in the input text, are OUTERBEG and OUTEREND. 
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Diagram SADMP-26. AMDSARDM — Real Storage Dump (Part 1 of 12) 


Input Process 


FLCNPSWS 


IL 


UIWNPSWS 


CONLIST 


E 
= 


LL 


UIWNPSWS 


! 


Store Status in 
Absolute Page 0 


| 





1 Build wait PSWs in low 
storage. 


2 Locate and enable the sub- 
channels for each console. 
Set and enable the interruption 
subclasses. 


3 Set up restart capability. 


4 Initialize the ORB. 


c 





Output 
PSWSAREA 


It 


FLCONPSWS 


Console 
Subchannels 
Enabled 


ot 


CTLINES 
CONESTB 





CTNOCONS 


FLCONPSWS 


tt 
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Diagram SADMP-26. AMDSARDM — Real Storage Dump (Part 2 of 12) 


Extended Description Module Label 


a 


1 AMDSARDM saves the caller’s new PSWs and replaces 
them with wait PSWs to field all unexpected 
interrupts. 


2 AMDSARDM locates and enables the subchannels for 

each of the consoles in the console list. For each 
console in the list, AMDSARDM sets the interrupt 
subclass. 


3  AMDSARDM sets on appropriate flags so that the 

real storage dump program can be retried at this 
point. AMDSARDM modifies the restart new PSW to 
pass control to this point is a restart interrupt occurs 
during real storage dump processing. AMDSARDM saves 
the store status information for the IPL processor so that 
the information remains valid for any further restart 
processing. 


4 AMDSARDN initializes the operation request block 
(ORB). 
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Diagram SADMP-26. AMDSARDM -— Real Storage Dump (Part 3 of 12) 


5 if tape IPL, attempt to assign the 
tape drive. 


Input Process 


G Unload any previous output 
tapes. 


7 Wait for a console or external 
interrupt. 





FLSCID CONLIST 


| 


Po EY Bs Look up this console. 


Q Request an output tape. 





CONSOLE 


IPLIO -—_ C ) Tape 


Output 


Rewound and 
Unloaded Tape 


FLCENPSW FLCINPSW 
Control Register 0 Control Register 6 


X‘140000' CTNOCONS=ON 


CTSID CONDEVN 
Control Register 0 Console 
Subchannel 
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Diagram SADMP-26. AMDSARDM -— Real Storage Dump (Part 4 of 12) 
Extended Description Module Label 


5 lf IPLed froma tape drive, AMDSARDM attempts to 

assign the tape drive. If the assign fails, AMDSARDM 
ignores the error because it is too late for SADMP to use 
another IPL device. 


G6 _s=i(If an output tape was previously set up, AMDSARDM 
writes an end-of-file mark and unloads the tape. 


7 AMDSARDM sets up the external new PSW and the 

|/O interrupt new PSW to intercept interrupts. 
AMDSARDM enables for external signal interrupts and 
attention interrupt by setting bits in control registers 0 
and 6. AMDSARDM loads a wait state PSW to wait 
for either interrupt. If AMDSARDM receives an 
external signal interrupt, AMDSARDM turns on the 
CTNOCONS bit, and SADMP continues processing and 
does not use a console. 


8 If an attention interrupt occurs, AMDSARDM 
searches the console list for the appropriate console, 
and prepares that console for use. 


Q AMDSARDM issues message AMDOO1A to request 

the device number of the output tape. If no console 
is available, AMDSARDM uses the output tape device 
number that was specified at generation time. 
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Diagram SADMP-26. AMDSARDM -— Real Storage Dump (Part 6 of 12) 


Extended Description Module Label 


1Q AMDSARDM converts the device number to a sub- 

channel identifier, and tests the validity of the sub- 
channel ID. If the subchannel |D is valid, and the device ts 
not already in use by SADMP, AMDSARDM checks if the 
output device is operational. |f the device is operational, 
AMDSARDM reads the label on the tape. If AMDSARDM 
accepts the label, or if there is no label, AMDSARDM 
continues using this tape as the output device. 


If output is to a tape drive, AMDSARDM attempts to 
assign the tape drive. If the assign command is rejected, 
the output device is not a 3480 tape drive. If the assign 
command is accepted, but it fails to assign path groups, 
AMDSARDM issues message AMDO691, rejecting the 
tape drive. 


If the output device is a 3480 tape drive, flag CT3480 is 
set to indicate this. AMDSARDM writes a display message 
to the tape drive indicating that a tape should be mounted. 


[f the tape drive is not a 3480 tape drive or it is and has 
been assigned, AMDSARDM reads the label on the tape. 
If AMDSARDM accepts the label, or if there is no label, 
AMDSARDM continues using this tape as the output 
device. 


If any of these tests fail, AMDSARDM issues message 
AMDO48i to prompt the operator for a new device num- 
ber. Then AMDSARDM returns control to step 8. 
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Diagram SADMP-26. AMDSARDM — Real Storage Dump (Part 7 of 12) 


Input Process Output 


AMDO11A DUMPTITL 


11. Prompt the operator for a title. [ 
FIXTITLE Time of Day 
[sd CONSOLE 


Processor > 12 Build the dump header record. 


Serial Number 


Channel Program 
13 Write the dump header record. 





PSA HOMECPU 


[|] LF 


Store Status Data 








SSPREFIX 


Header Page O 


CPURINIT CTPREFIX 


SY 1 G ~Ob tain processor data and write [sd [Cd 





CTPREFIX 


TOPREAL 


15 If VM machine, calculate the 
top of real storage. 








c. c 
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Diagram SADMP-26. AMDSARDM — Real Storage Dump (Part 8 of 12) 
Extended Description Module Label 


171 AMDSARDM issues message AMDO11A to request 
a dump title from the operator. 


12 AMDSARDM completes the dump header record, 
using the dump title. 


13 AMDSARDM writes the dump header record to the 
output tape. 


14 AMDSARDM obtains the address of the processor 
that is executing SADMP. If the prefix value from 

the original store status points to a valid PSA, AMDSARDM 

saves the PSA. AMDSARDM builds a processor status 

record for the processor that is executing SADMP, and 

writes the record to the output tape. 


AMDSARDM issues a store status command to each online 
processor. For each processor, if the prefix value for the 
store status points to a valid PSA, AMDSARDM saves the 
PSA. AMDSARDM builds a processor status record for 
each online processor and writes the records to the output 
tape. 


15 If SADMP is executing on a VM machine, AMDSARDM 

interfaces with the service processor via a SCP INFO 
command. From the data that the SCP INFO command 
returns, AMDSARDM calculates the top of real storage and 
saves the value in FOPREAL. 
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Diagram SADMP-26. AMDSARDM — Real Storage Dump (Part 9 of 12) 


Input 







Real Storage 








or 





Header 


TOPREAL 


Process 


16 


17 


18 





20 


Modify program check and 
machine check new PSW’s. 


Read page 0 from the IPL 
volume and write it. 


Obtain pages from the IPL 
work file. 


Obtain and write each page of 
real storage. 


Restore the original interrupt 
handlers. 





OUTPUT 


OUTPUT 


Control Register 14 


[ 


Page Buffer 


FLCPNPSW FLEMNPSW 


PSW Disabled for 
Machine Checks 


Ld 
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Diagram SADMP-26. AMDSARDM — Real Storage Dump (Part 10 of 12) 
Extended Description Module Label 


16 AMDSARDM sets up the machine check new PSW and 

the program check new PSW to intercept these inter- 
rupts if storage errors occur while accessing or dumping 
real storage. AMDSAR DM enables for machine checks by 
setting bits In control register 14. 


17 AMDSAR DM reads page 0 from the IPL volume 
workfile, and dumps the contents of page 0 to the 
output tape. 


18 AMDSARDM obtains the pages saved on the IPL 
volume workfile by AMDSAIPL. AMDSARDM dumps 
these pages to the output tape. 


19 AMDSARDM obtains each page of real storage and 

its storage key, and dumps these to the output tape. 
If SADMP is executing on a VM machine, AMDSARDM 
uses the value in TOPREAL to determine the highest page 
to dump. If SADMP is not executing on a VM machine, 
AMDSARDM attempts to dump all pages to the architec- 
tural limit. If a page is not there, the program check 
handler gets control. The program check handler passes 
control back to this step so that AMDSARDM can attempt 
to dump the next page. 


| 20 AMDSARDM restores the original program check and 


machine check interrupt environment. 
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Diagram SADMP-26. AMDSARDM — Real Storage Dump (Part 11 of 12) 


Input Process 


CTPREFIX 
21 ~~=~‘Terminate if no valid prefix 
exists. 


22 Save the CVT address, the 
master segment table, and the 
PCCA address. 


 -23. Write an end-of-file on the 


output tape. 





OUTPUT 


CTCVTP 
CTPCCAV 
CTSTDM 


Disabled 
Wait PSW: 


X'150200' 


Tape 
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Diagram SADMP-26. AMDSARDM — Real Storage Dump (Part 12 of 12) 


Extended Description Module Label 


21 ~=«*‘If the prefix address is not valid, AMDSARDM issues 
message AMDO68I to inform the operator that 
virtual storage cannot be dumped due to an invalid prefix 
address. AMDSARDM then loads a disabled wait state 

PSW. 


{f output is to a 3480 tape drive, AMDSARDM writes a 
display message to the tape drive indicating that SADMP 
is complete and attempts to unassign the tape drive. 
AMDSARDM the loads a disabled wait state PSW. 


22 AMDSARDM saves the addresses of the CVT and the 

PCCA, and saves the master segment table designation. 
AMDSADIP, the virtual storage dump program initialization 
module, later uses this information. 


23 AMDSARDM writes an end-of-file indicator on the 
output tape so that if the virtual storage dump pro- 
gram cannot be loaded, the tape is complete. 


If the output is to a 3480 tape drive, AMDSARDM 
attempts to unassign the tape drive. 
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Diagram SADMP-27. CONSOLE — Subroutine of AMDSARDM — Read from and Write to the Operator Console (Part 1 of 4) 


Process Output 






Input 





Register 15 


CTNOCONS [OT  1-=SOIN f nto console is available, return. 


CTCONSID 


2. Set up for console 1/0. 


Enabled for Console 


Beginning of Message 


Register 1 
Message 
Register 6 Parameter CTLINES 


a a —— 3 Compute the position of the 
message on the screen. 
MPFCONT 


CTLINES Register 7 


End of Message 


MPLNCNT 


WOR KREG3 


CTLINES 


CTSCREND |- Erase Screen 


Automatically 





4 If message fills the screen, 
erase it. 


BK Set up the channel program. 


Message to 


G Perform the write. 
DUMPSIO Console 


— If anerror occurs, seta 
return code. —_- 


ok 


U c 
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Diagram SADMP-27. CONSOLE — Subroutine of AMDSARDM -— Read from and Write to the Operator Console (Part 2 of 4) 


Extended Description Module 


1 ‘If no console is available, CONSOLE returns to its 
caller with a return code of 4. 


2 CONSOLE enables only for console interruptions by 
setting bits in control register 6. 


3 CONSOLE selects a message to write by examining 

the message parameter list (MSGPARM). The address 
of the message parameter list is passed to CONSOLE in 
register 6. To determine whether the message fits on the 
screen, CONSOLE computes the position of the message 
on the screen. 


4 siIf the screen does not have room for the message, 
CONSOLE checks whether to prompt the operator 
before erasing the screen. If prompting is specified, 
CONSOLE issues message AMDO29D. Whether or not 
prompting is specified, CONSOLE then erases the screen. 


BK CONSOLE fills in the channel program and calculates 
the console buffer address from the screen line 
number. 


6 CONSOLE calls subroutine DUMPSIO to write the 
message to the console. If an error occurs, CONSOLE 
returns to the caller with a return code of 8. 


Label 


C 
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Diagram SADMP-27. CONSOLE — Subroutine of AMDSARDM — Read from and Write to the Operator Console (Part 3 of 4) 


Input Process Output 


Enabled Wait Code 


Console 


7 Wait for areply. X‘1300nn’ 
Interrupt 


i ase) 8 Set up channel programs and 


read the reply. 






DUMPSIO 


Return 





nn=message ID 
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Diagram SADMP-27. CONSOLE — Subroutine of AMDSARDM — Read from and Write to the Operator Console (Part 4 of 4) 
Extended Description Module Label 


7 silf the written message prompts for a reply, CONSOLE 
loads an enabled wait state to wait for a reply. 


8 When CONSOLE receives a console interrupt, 
CONSOLE fills in the channel program and calls 
subroutine DUMPSIO to read the reply. If an error occurs, 
CONSOLE returns to the caller with a return code of 8. 
If no errors occur, CONSOLE returns to the caller witha 

return code of 0. 


Wal JO Ajsadoig — sjeiajeyA] pasuacry 


WAI JO S[BLIDETA] P29LSay SUIB)UOD 


Contains Restricted Materials of IBM 
Licensed Materials — Property of IBM 


“AIQUINU BDIAGP 34} $1 Ppp PPPOLL.X 


MSd EM paiqeuy 





wesBolg 
JauUUBYD 


MsdNiovd | 


3ndinNO 






"ydnsaiul O/| UB 10) 1eEM F 





‘Ofjfeyruas Z CF >7} atutueyoang 


| aajsiGay 


48] Puey 
wna! O/| ayIdNIwg 


$$990/d }ndu| 


(p JOT ued) O/] UWOpLag — WAUVSAWY Jo auljnoiqng — OISAWNC ‘87-dNayYS weBseig 


LY28-1189-2 © Copyright IBM Corp. 1982 1985 


4-132 MVS/Extended Architecture Service Aids Logic 


S861 7861 “di0od WI 1y3UAdoD © 7-681 1-8Z7AT 


(AWAVSAWY) dung auoly-pueig ‘p JoydeyD 


cel-v 


C C 


Diagram SADMP-28. DUMPSIO — Subroutine of AMDSARDM — Perform I/O (Part 2 of 4) 


Extended Description Module Label 


1 DUMPSIO sets up the I/O new PSW so that 
DUMPSIO can intercept |/O interrupts. 


2 DUMPSIO issues an SSCH instruction to start the 
1/O. If the device is not operational, DUMPSIO 
processes a restart to start the dump again. 


3 DUMPSIO loads a wait state PSW to wait for the 
|/O to complete. 
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Diagram SADMP-28. DUMPSIO — Subroutine of AMDSARDM — 


Extended Description Module 


4 When DUMPSIO receives the I/O interrupt, 
DUMPSIO checks to see if the |/O is complete. 

if the 1/O is not complete, DUMPSIO takes appropriate 

action by either restarting the |/O or waiting for further 

Status. 


5, DUMPSIO checks for I/O errors and performs 
appropriate error recovery activities. 


§ «if an uncorrectable error occurs, DUMPSIO issues 
message AMDOO31. 


7 If the dump terminates because of the |/O error, and 
the |/O error was not on the output tape, DUMPSIO 
writes an end-of-file indicator on the tape, and rewinds 
and unloads the tape. DUMPSIO loads a wait state PSW 
to notify the operator that the dump ended abnormally. 


C 


Perform [/O (Part 4 of 4) 
Labe! 
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Diagram SADMP-29. LBL CHECK — Subroutine of AMDSARDM (Part 1 of 2) 


Input Process 


1 Read the label. 


IRBDOSUEX 
2 fan error occurs while reading 
the label, reject the tape. 
TAPELBLI 


; ( + ——> 3 Reject password protected tape. 


TAPELBLI 





4 Obtain permission from the 
operator to write over the label. 





TF? SBD _ Issue tape display. 


G Rewind the tape. 











Output 


OUTPUT 


DUMPSIO 


are 


OUTPUT 


Return to Caller 


AMDOSOA Enabled Wait PSW 


X’160100' 


AMD047A 


AMDO45D 


AMDO49I 





AMDO51A 
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Diagram SADMP-29. LBL CHECK — Subroutine of AMDSARDM (Part 2 of 2) 
Extended Destription Module Label 


1  LBLCHECK calls the OUTPUT subroutine to read 
the tape label. 


2 (If the tape has a label that cannot be read, LBLCHECK 
rejects the tape and issues message AMDO50A to 
request mounting of another tape. 


3 sO the tape is password protected, LBLCHECK rejects 
the tape and issues message AMDO47A to request 
mounting of another tape. 


4 siIf the tape has a readable label, and is not password 
protected, LBLCHECK issues message AMDO45D to 
ask the operator whether or not to use the labeled, unpro- 
tected tape. If the operator provides an incorrect reply to 
message AMDO45D, LBLCHECK issues message AMDO49I 
to inform the operator of the syntax error. If the operator 
rejects the tape, LBLCHECK issues message AMDO51A to 
ask the operator to Mount another tape, and repeats 
steps 1-4. 


5 siIf any of the above tests fail or the tape is rejected, 

and the output is to a 3480 tape drive, LBLCHECK 
writes a display message to the tape drive indicating that 
the labelled tape is rejected and that a new tape should be 
mounted. 


6 si! f the tape is unlabeled, or if the tape passes the 

above tests, LBLCHECK calls the OUTPUT subroutine 
to determine whether the tape is file protected. If the tape 
is file protected, OUTPUT prompts the operator to puta 
ring in the tape. OUTPUT also rewinds the tape, so that the 
output tape is ready to use. 
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Diagram SADMP-30. OUTPUT — Subroutine of AMDSARDM (Part 1 of 4) 


Register 11 Channel Program 


CTOUTSID 


WRITE EOT 


CCWs to Write 
Tape Mark 


RWULDCMD 


CCWs to Rewind 
and Unload Tape 





Control 
Register 6 
Mask off all but the output 
interrupts. 


Perform the !/O. 


DUMPSIO 


If successful, return to the caller. 


Return to 
the Caller 
Tape Mark 


If this is the end of the reel, 
on Tape 


write a tape mark. 


DUMPSIO 
DUMPSIO Unloaded 
Tape 


Rewind and unload the tape. 
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Diagram SADMP-30. OUTPUT — Subroutine of AMDSARDM (Part 2 of 4) 
Extended Description Module Label 


| 1 OUTPUT enables for output tape interrupts by 
setting bits in control register 6. 


2 OUTPUT puts the output subchannel identifier (1D) 
into register 1, and calls subroutine DUMPSIO to 
perform the |/O. 


3 =f the 1/O succeeds, OUTPUT returns to the caller. 


4 = \f OUTPUT reaches the end of the reel, OUTPUT 
calls subroutine DUMPSIO to write a tape mark 
on the tape. 


5 OUTPUT calls subroutine DUMPSIO to rewind and 
unload the output tape. 
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Diagram SADMP-30. OUTPUT — Subroutine of AMDSARDM (Part 4 of 4) 
Extended Description Module Label 


6 sii the output is to a 3480 tape drive, output writes 

a display message to the output-drive indicating 
that the tape has reached end-of-reel, and that a new 
tape must be mounted. 


OUTPUT issues message AMDOO4A to inform the 
operator to mount another tape. Then OUTPUT 
loads a wait state PSW to wait for the new tape. 


7 After the new tape is mounted, OUTPUT calls 
subroutine LBLCHECK to check if the mounted 
tape is usable. 
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Diagram SADMP-31. AMDSARSM — Real Storage Management (Part 1 of 4) 


Input 


RCB Queue 





RADRECNO 


MAXRECNO 


RITFCSA 


RITFPRVX 





Process 


1 


Output 

PTAVAIL RARCODE 
Initialize fields and enqueue foo 6 fll | 
RSM RCB. 

RSMRCB 
New RCB 

RADRECNO 

Increase and test the recursion 


RADRECNO+1 


counter. 
Register 15 
e@ If there are too many recur- 
7ERROR =) 
REASON (ECRSMREC 


sions, set return code and 
exit. 





Register 1 BCT 


® Otherwise, accept input and 


set a pointer to the BCT. . 
Check the faulting address. 
ORGPGTS PGEINX 


tables and the virtual address of 


the page. SEGINX PXP 


[ 


BCTPGT MAPPEDS1 
If the fault is on a page table, put 


the real SGTE address into the Le 


BCT. 


C. c 
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Diagram SADMP-31. AMDSARSM -— Real Storage Management (Part 2 of 4) 


Extended Description Module Label 


1 AMDSARSM initializes PTAVAIL to OFF, presets an 
error return code, and enqueues an RSM RCB. 


2 AMDSARSM increases the recursion counter by 1 and 

compares this count to the maximum allowable number 
of recursions. If RADRECNO exceeds MAXRECNO, 
AMDSARSM sets an error return code of 16 and terminates. 
If RADRECNO does not exceed MAXRECNO, AMDSARSM 
accepts the input and sets a pointer to the input buffer con- 
tro! table. 


3 AMDSARSM checks if the faulting address is in 
COMMON. If it is, AMDSARSM uses the COMMON 
ASID for reclaiming and dumping. 


4 AMDSARSM computes the apparent origin of the 
faulting page. |t also computes the segment index, 
page index, and address of the page table page. 


5 silf the fault is on a page table, AMDSARSM puts the 
real address of the corresponding SGTE into the 

BCT. If the PGT itself maps a PGT, AMDSARSM 

marks the BCT for last-resort stealing only. 
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Diagram SADMP-31. AMDSARSM — Real Storage Management (Part 3 of 4) 


PGTINV 


BC _ G Verify the DAT tables. 


e If the DAT is invalid, set a 
return code and exit. 


Input Process 


7 Place the address of the page’s 
PGTE in the BCT. 


PGTE 
8 Place the address of any BCT 
a ——————— for the page's page table in 


the BCT. 
Q Locate the page in storage. 
a. Try to reclaim the page from 


real storage and set a return 
code. 


b. Search for the page in the 
MPE'’s for this address space. 


c. Check for pege on the swap 
data set and set a return code. 


d. Search for the page on 
extended storage and page 
it in, 


e. Check for page on page 
data set. 


— If page is on a page data set. 


RCB Queue — If page is not on a page 
data set. 


So /_ > 1Q Dequeue the RSM FCB, decrease 


recursion count and return. 


RSMRCB 


RADRECNO 


[ 








Cc 


H 
: 


ut 


SVCXSM) 


Output 


Register 15 


wo 
@) 
| 


BCTPGTEP 


CT 
BCTPTBCT 


Register 15 


If Reclaim 

Register 15 Register 15 

Valid MPE Invalid MPE 

found found 

Register 15 Register 15 

74] on 

If Reclaim If No Reclaim 
Register 15 Register 15 


Register 15 


Original RCB 


RADRECNO 


RADRECNO-1 


c. 
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Diagram SADMP-31. AMDSARSM — Real Storage Management (Part 4 of 4) 
Extended Description Module Label 


6 AMDSARSM verifies that it is using the correct DAT tables. If the DAT tables are invalid, 
AMDSARSM sets an error return code of 12 and terminates. 


7 AMDSARSM puts the virtual address of this frame’s PGTE into the BCT. 


8 If the page’s page table is in a buffer that is mapped by a SADMP BCT, AMDSARSM puts the 
address of that BCT into the page’s BCT. 


9 AMDSARSM locates the page in real storage, extended storage or auxiliary storage. 


a. AMDSARSM tries to reclaim the page from real storage. If the page is reclaimed, 
AMDSARSM sets a return code of 4. 


b. AMDSARSM searches the MPEs for this address space for an MPE corresponding to this 
page. If it finds one and the MPE is valid, AMDSARSM indicates the page can be paged 
in from auxiliary storage and sets a return code of 8. If it finds one and the MPE is 
invalid, the page cannot be found; AMDSARSM then sets a return code of 12. 


c. If AMDSARSM could not reclaim the page from real storage, it looks for the page on a 
swap data set or in real storage where the page has just been read in by an MVS/XA swap 
in. AMDSARSM sets a return code of 4 if this reclaim succeeds or a return code of 8 if 
reclaim fails. 


d. The page may also be on extended storage; if it is, AMDSARSM calls AMDSAXSM to 
page in the page and sets a return code 0. 


If the page is on extended storage, AMDSAXSM pages it in. 

e. If the page is still not found, AMDSARSM looks for the page on a page data set. If the 
page is on a page data set, AMDSARSM sets a return code of 8. If the page is not on a 
page data set, AMDSARSM sets a return code of 12. 


10 AMDSARSM dequeues the RSM RCB, decreases the recursion counter, and returns to the caller. 
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Diagram SADMP-33. AMDSASIN — Address Space Initialization (Part 1 of 4) 


Input 


Register 1 





SINRCB 








ASCBASID MSTRASID 


| SS 2 \f the address space is the master 


RABSWOUT RABSWPR 


| | Ld => 


SGTE 


Old 0 


Page Table Lo 


RADRECNO 


= 


Process 


1 Receive the input ASCB, enqueue 
the SINRCB, and check the 
validity of the RAB. 


scheduler address space, set a 
return code. 


3 «If the address space is not the 


master scheduler address space: 


@ Determine the location of 
the address space. 


@ Create a segment table. 


@ Create the top page table. 


@ Create the 0 page table. 


4 initialize the RSM function and 


the address fault recursion count. 


C 


Output 


Register 15 


RADRECNO 


Top 
Page Table 


0 
Page Table 
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Diagram SADMP-33. AMDSASIN — Address Space Initialization (Part 2 of 4) 


C 


Extended Description 


AMDSASIN initializes an address space so that SADMP can 


execute in that address space. 


1 


2 


3 


AMDSASIN receives the input ASCB, enqueues a SIN 


RCB, and checks the validity of the RAB. 


If the address space is the master scheduler address 


space, AMDSASIN sets a return code of O. 


If the address space is not the master scheduler 
address space: 


AMDSASIN determines whether the address space is 


swapped in, swapped out, or being processed by a 
MVS/XA swap. 


AMDSASIN creates the segment table first by reading 


and dumping the segment table, and second, by 
copying all common SGTES from the master SGT 
into the new segment table. 


AMDSASIN creates the top page table, reads in and 


dumps the top page table, and marks the top page 
table entries as invalid. AMDSASIN hooks up the 
top PGT so that the swapped-in address space can 
function. 


AMDSASIN creates the O page table, reads in and 
dumps the O page table, and marks the O page 
table entries as invalid. AMDSASIN hooks up the 
page O DAT tables. 


AMDSASIN initializes the RSM function for local 
address space by determining the beginning and 
ending addresses of the virtual storage ranges used 
by page tables in the local address space. 
AMDSASIN initializes the address fault recursion 
count. 
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Diagram SADMP-33. AMDSASIN — Address Space Initialization (Part 4 of 4) 


Extended Description Module Labsl 


5 AMDSASIN sets up the SGT output by determining 
the value to place in CTSTDD, the portion of the 
CCT that is the STD for the address space being dumped. 


G6 AMDSASIN dequeues the SIN RCB and sets the 
return code. A return code of 0 indicates that the 
address space was already in, and no swapping is neces- 
sary. A return code of 4 indicates that the address space 
was swapped in. A return code of 8 indicates abnormal 
termination; the address space was not swapped in. 
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Diagram SADMP-34. AMDSASIO — Utility for I/O Operations (Part 1 of 2) 


Input 


Register 1 


LIODBREAD = 1 
IOOBPAGE = 1 


IODBWRIT = 1 
lIODBOUT = 1 


IODBCHP=1. —— — —— 


IODBSNSC = 1 


IODBCLDS = 1 
JODBOUT = 1 


IODBWAIT =1 — —-— -— 


IOOBREAD = 1 
|IOOBPAGE = 1 








Read from the page data set. 


Write to the output tape. 


Execute the channel program 
supplied by the user. 


Issue a SENSE command. 


Close the output tape. 


lf a wait is requested, wait for an 


{/O interruption. 


For page-in |/O, mark the BCT 


as no longer in use. 


PAGEIN 


WRITTAPE 





CLOSESCH 


AMDSAWAT 








Output 


Page of Data in Buffer 
Fe 


Page on Tape 


IODBSENS 


Tape Rewound and 
Unloaded 


lIODB 
BCT 


BCTIO=0 


Wal Jo Aysadoig — sjeuiajeyA] posuaory 


WG] JO STRLO}BA PazILIJsoy suleju0; 


S861 7861 “lod Wag] WysuAdOD © 7-681I-8ZAT 


(ANAGVSAGWY) dung auojy-puris ‘p tajdeyD 


ISt-p 


Diagram SADMP-34. AMDSASIO — Utility for 1/O Operations (Part 2 of 2) 
Extended Description Module Label 


1 If a caller requests that a record be read from auxiliary storage (IODBREAD = | and IODBPAGE 
= 1), AMDSASIO calls the PAGEIN subroutine. 


2 If a caller requests that a record be written to the output tape (IODBWRIT = | and IODBOUT = 
1), AMDSASIO calls the WRITTAPE subroutine. 


3 If the caller requests that I/O be executed using the caller’s supplied channel program (IODBCHP), 
AMDSASIO calls the COMMONIO subroutine. 


4 If the caller requests that a SENSE command be issued (IODBSNSC = 1), AMDSASIO calls the 
SIOSENSE subroutine. 


5 If the caller requests that a CLOSE be issued for the output tape JODBCLOS = | and IODBOUT 
= 1), AMDSASIO calls the CLOSESCH subroutine. 


6 If the caller requests AMDSASIO to wait for an I/O interrupt (ODBWAIT = 1), AMDSASIO calls 
the AMDSAWAT subroutine. The request is valid only if the return code value is zero. That is, when 
starting I/O, no error occurred. 


7 If the request was for a read from auxiliary storage JODBREAD = |! and IODBPAGE = 1), 
AMDSASIO frees the buffer contro] table (BCT) entry by marking it as no longer in use (BCTIO = 
0). 
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Diagram SADMP-35. PAGEIN — Subroutine of AMDSASIO (Part 1 of 4) 


Input Process 





IODB lIODBPGST 


pe [i}-- — — — — _]__m» 1 |!f the device is a paging storage 
device: 
lIODBSEEK BCT 


lODBSRCH Po > A Copy the cylinder and 


IODBREQ BCTBUFRA head address into the 
paging parameters. 


B Set the search address 


Buffer to |ODBSRCH. 
jj 
C Set the input area 
PSCHP address of the page 
buffer. 


Channel Program 


to Read a Page 
D Read in the page. 
Page or 


Swap 
Data Set 





Output 


[ODBSEEK 


l\ODBSRCH 


PSCHP 


Set Paging 
Parameters 


Paging Parameters 


| SEARCH | 


Buffer 
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Diagram SADMP-35. PAGEIN — Subroutine of AMDSASIO (Part 2 of 4) 


Extended Description Module Label 


1. When the device is a paging storage device: 


A 


B 


AMDSASIO PAGEIN 


PAGEIN points the cylinder and head 
address to the paging parameters, PSPCCHH. 
PAGEIN puts the pointer to the search 


address into the channel program search 
address. 


PAGEIN puts the real address of the page 
buffer into the channel program input area 
address. 


PAGEIN calls the COMMONIO subroutine 
passing it a channel program (PSCHP). 
COMMONIO executes the channel pro- 
gram causing a page to be read in from 
auxiliary storage. 
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Diagram SADMP-35. PAGEIN — Subroutine of AMDSASIO (Part 3 of 4) 


Input Process 
|ODBPGST 
[o }— et eee 2 If the device is not a paging storage 
lODB device: 
= 
BCT . 
|IODBSEEK a as: A Set tne seek address in the 


lIODBSRCH BCTBUFRA 


(ee 
TODBREQ 


B Set the search address to 
eu \ODBSRCH. 


| ey! 


Channel Program 
to Read a Page 


C Set the input area address to 
the address of the page buffer. 


D Read in the page. 


Page or 
Swap 
Data Set 


a 





channel program to |ODBSEEK. 


COMMONIO 


Return 


Output 


lIODBSEEK 


SEARCH 


aie | 


IODBSRCH 


Buffer 
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Diagram SADMP-35. PAGEIN — Subroutine of AMDSASIO (Part 4 of 4) 
Extended Description Module Label 


2 When the device is not a paging storage device: AMDSASIO PAGEIM 


A PAGEIN puts the pointer to the SEEK 
address into the channel program SEEK 
address. 


B PAGEIN places the pointer to the search 
address into the channel program search 
address. 


C PAGEIN places the real address of the 
page buffer into the channel program 
input area address. 


[ID PAGEIN calls the COMMONIO subroutine 
passing it a channel program (DACHP). 
COMMONIO executes the channel! program 
causing a page to be read in from auxiliary 
storage. 
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Diagram SADMP-36. CLOSESCH — Subroutine of AMDSASIO (Part 2 of 2) 
Extended Description Module Label 


1 ‘If 1/0 is active on the tape (IODBINTX=1), AMDSASIO CLOSESCH 
CLOSESCH waits for all 1/O to complete. This is 

accomplished by a recursive call to AMDSASIO via an 

SVC instruction. Control is returned to CLOSESCH 


when all |/O has completed (IODBINTX=0). 


2 CLOSESCH calls the COMMONIO subroutine, 

passing ita channel program (CLOSECHP). 
COMMONIO executes the channel program causing the 
output tape to be rewound and unloaded. 


3  CLOSESCH sets an indicator (IODBWAIT=1) so 
that mainline AMDSASIO will wait for the 1/O 
that was started in step 2 to complete. 
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Diagram SADMP-37. SIOSENSE — Subroutine of AMDSASIO (Part 1 of 2) 


Input Process Output 






\ODBWRC 
X'340ddd’ 






lODB 


{ODBSENS 
2 Store the length of the SENSE 


| data into the SENSE CCW. 
Save 
area 
SENSECCW 
ES 
SS 


1 Store the SENSE wait code in 
the IODB. 









ddd = device number 





IODBSENL 











SENSECCW 





IODBSENS 










po 3 Store the address of the SENSE 


data into the SENSE channel! 
SENSCSW 


program and clear the SENSE 


data area. 









COMMONIO 





4 Issue the SENSE. 


Return 
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Diagram SADMP-37. SIOSENSE — Subroutine of AMDSASIO (Part 2 of 2) 


Extended Description Module Label 


1 SIOSENSE places the SENSE wait state code and the 
device number into the |ODB. 


2  SIOSENSE copies the length 1|ODBSENL of the 
sense data into the length field of the sense CCW. 


3 SIOSENSE places a pointer to the SENSE informa- 
tion area into the SENSE channel program and 
clears the SENSE information area. 


4 SIOSENSE calls the COMMONIO subroutine, passing 

it a channel program (SENSECCW). COMMONIO 
executes the channel program causing a SENSE command 
to be issued for the device indicated by |ODBDEV. 
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Diagram SADMP-38. COMMONIO — Subroutine of AMDSASIO (Part 1 of 2) 


Input 


| 


|ODBSCH 








1 


Process 


Translates the channel program 
address to real. 


Initialize the ORB. 


{Indicate that an interrupt is 
expected. 


Load the Subsystem ID into 
register 1. 


Start the subchannel. 


lf |1/O started, return to caller. 


If the status is pending, wait for 
an interruption and retry the I/O. 


If the subchannel is busy, set the 
AMDSASIO return code. 


lf the subchannel is not operational 


set the return code, indicate that 


there is no interrupt expected, mark 


the |ODB as unavailable, and 
display an error message to the 
operator. 





Output 


SVC(SVCTCP) 


AMDSAWAT 


SVC (SVCCON 


| |e 


Return 


fe) 


© 
Oo 
O 
x 
wv 


RB 


1ODB 


Register 1 


RCODE 


RCODE 


IODB 


AMDO15I 


CIOCHP 
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Diagram SADMP-38. COMMONIO — Subroutine of AMDSASIO (Part 2 of 2) 
Extended Description Module Label 


1 If the channel program has virtual addresses 
(1ODBCHPR = 0), COMMONIO calls AMDSATCP 
to translate the addresses te real. 


2 COMMONIO initializes the operation request block 

(ORB) by setting a pointer to the IODB and the 
channel program (CIOCHP), COMMONIO indicates that 
the CCWs are format 1 CCWS, and that all paths should 
be enabled for the device. 


3 COMMONIO indicates that an |/O Interrupt is 
expected (IODBINTX=1). 


4 COMMONIO places the subsystem identifier (‘SID’) 
into register 1, where it is used by the start sub- 
channel command (SSCH). 


5 COMMONIO issues the SSCH command passing it 
the ORB. 


6 iIf the SSCH command was successful, COMMONIO 
had no more processing to do. It returns to the 
caller. 


7 silf the SSCH command indicates that the subchannel 

has status pending, COMMONIO calls the subroutine 
AMDSAWAT to handle the |/O interrupt. When 
AMDSAWAT completes, COMMONIO executes from 
step 2 to retry the SSCH command. 


8 If the SSCH command indicates that the subchannel 
is busy, (I/O has already been started to that sub- 
channel), COMMONIO sets the return code to 8. 


9 If the SSCH command indicates that the subchannel 
is not operational, COMMONIO sets the return code 
to 16. COMMONIO Indicates that no |/O interrupts 
are expected {(IODBINTX=0) and that the |ODB is 
unavailable (IODBUNAV=1). COMMONIDO issues message 
AMDO15I and if the error occurred on the output volume, 
it issues message AMDO32I. COMMONIO these messages 
by calling the virtual dump console service routine, 
AMDSACON, via an SVC instruction. 
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Diagram SADMP-39. WRITTAPE — Subroutine of AMDSASIO (Part 1 of 2) 





Input Process Output 


buffer 
1 Create a CPB and build the output 


IODBREQ aan 
channel program in it. 


IODBIOQP 


TICS in 
ieee: me : = SVC (SVCGTM) 
procrams 
CPB I/O queue 
2 Hook the BCT onto the CPB, 
indicating that the BCT is waiting 
for the channel program to 


complete. 


QCADOWN | BCTIOQP 


3 Add the CPB to the left of the 
output 1/O queue. 


CPB 


IODBIOQP iO queue 


4 \f another CPB is on the queue, 
chain the current one to its right 
neighbor. 


SVC (SVCTCP) 


IODBINTX a ne ge ee 5 If this is the only CPB on the queue 
and the subchannel is inactive, start 
the 1/0. 


COMMONIO 
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Diagram SADMP-8. WRITREAD — Subroutine of AMDSACON (Part 2 of 2) 


Extended Description Module Label 


1 WRITREAD increases the count of lines on the 
screen. If the screen would be filled by that 

amount of lines, WRITREAD sets the CCW command to 

ERASE/WRITE and resets CTLINES to 1. 


2 WRITREAD computes the 12/14-bit screen address 
from CTLINES and the known screen width 
(SW3277). 


3 The channel program sends aWRITE or ERASE/ 

WRITE command to the console, unlocks the 
screen if a reply is expected, and furnishes the screen 
address and the data to be written. 


4 The ?I0 macro points the console IODB (XIOBCON) 
to the channel program and calls AMDSASIO. 


BR silf a reply is expected, WRITREAD calls AMDSASIO 
to wait for an attention interruption caused when 
the operator presses enter. 


6 WRITREAD builds a channel program to read the 
reply and calls AMDSASIO (Steps 3 and 4). 


7 WRITREAD converts the reply to upper case. 
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Diagram SADMP-40. AMDSAWAT — Subroutine of AMDSASIO (Part 1 of 2) 


Input 
1ODB 
CUCU 
aGENae oe 








Build a wait code for a wait PSW. 





1ODB 


2 Wait for the I/O if: 





e This is the first interrupt 
request. 


e This is an intervention request. 


e This is a standard wait request. 


lODBWCNT 


| 


Increase the |ODB wait count. 


fr 


Wait for an interrupt. 


lIODBWCNT 


n+1 eS 


+ 


Decrease the |ODB wait count. 


G Caller can request to continue 
waiting. 


IODBERR —-— + —-——--—— @ 7 |f an error occurred, set the 
AMDSASIO return code. 





ENABLED 
WAIT 


Return to caller 


Output 


Wait PSW 


—— | X'310ddd’ | 


IODBWCNT 
n+1 


IODBWCNT 


RCODE 
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Diagram SADMP-40. AMDSAWAT — Subroutine of AMDSASIO (Part 2 of 2) 


Extended Description Module Label 


1 AMDSAWAT builds a wait state PSW. AMDSAWAT places a wait state code and the device AMDSASIO. AMDSAWAT 
number into the PSW. The PSW is enabled for [/O, external, and machine check interrupts. 


2 For an interrupt request (IODBINRQ = 1), AMDSAWAT waits, whether or not the device is active; 
it returns after the first interrupt. 


For a first interrupt request (ODBFINT = 1), AMDSAWAT waits for an interrupt only if the 
device is active, then returns once an interrupt is received. 


For other types of requests, AMDSAWAT waits until no more interrupts are expected ((ODBINTX 
= 0). 


3 AMDSAWAT increases the wait count in the IODB. 
4 AMDSAWAT loads a wait state PSW (WATPSW) via the LPSW instruction. 


5 After the interrupt is received, AMDSAWAT decreases the wait count in the IODB. After the I/O AMDSASIO JYOWATRCT 
has completed or there is a PCI interrupt from a tape, AMDSAIOI (AMDSADMP’s virtual dump 
{/O interrupt handler) returns control here. 


7 If the IJODB shows an unrecoverable error, AMDSAWAT sets the return code to ]2. 
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Diagram SADMP-41. AMDSASRR-—System Restart Handler (Part 1 of 4) 


Entered Via 
SVC 
Input Process 





1 Reset CTAUDACT flags so 
?7ERROR will work. 


R 
CTRCB CB Queue 


Po ss a - ————— 2 Enqueue the restart RCB. 


3 Call for a dump. 


CTIODB [ODB Queue 


ras = - $<. 4 Wait for all paging |/O ta halt. 


XIODBOUT 


Pe ee) B Wait for al! output 1/O to halt. 










Output 


CTAUDIOX | =OFF 


CTAUDRCR =OFF 
CTRCB 


New 
RCB 


?7ERROR REASON (ECRESTRT) 
DUMP —v * 


710 CLOSE E> Paging 
210 (XIODBOUT) WAIT [[__) Tape 


SADMP 
Self-dump 
on Output 
Tape 


Devices 
Quiet 


Quiet 
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Diagram SADMP-41. AMDSASRR-—System Restart Handler (Part 2 of 4) 
Extended Description Module Labei 


1 AMDSASRR turns off CTAUDRCR and CTAUDIOX 
to show that all error recovery modules can be used. 


3 AMDSASRR sets CTAUDDMP to call for a diagnostic 
dump, then calls AMSSAAUD. AMDSASRR assumes 
the operator restarted SADMP because of an error. 


4 AMDSASRR proceeds down the IODB queue (CTIODB) 
looking for paging IODBs (|ODBPAGE=ON). For 

each paging |ODB that has an active device (|(ODBINTX=ON), 

AMDSASRR calls AMDSASIO to wait for the paging |/O 

to complete. 


f  AMDSASRR calls AMDSASIO to wait until all output 
[/O to the output tape has completed (IODBINT X=OFF). 
The output tape has an IODB of XIODBOUT. 
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Diagram SADMP-41. AMDSASRR-—System Restart Handler (Part 3 of 4) 


Input Process Output 


SADMP 
SADMP Storage é Storage 


Reset SUT to indicate that no 
storage is allocated. 


Logically 
Unallocated 


RCB Queue Dequeue the restart RCB. 


Reinitialize the SADMP virtual ee 4c a a 


dump. Origiiat 
RCB 


To Entry Point 
RESTART in 
AMDSAPGE 
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Diagram SADMP-41. AMDSASRR-—System Restart Handler (Part 4 of 4) 
Extended Description Module Label 


G AMDSASRR sets SUTFUNIN=FUNIN to indicate 
that no storage is allocated. 


JF  AMDSASRR dequeues the restart RCB. 


8 AMDSASRR branches to label RESTART at the 

beginning of AMDSAPGE. This causes AMDSAPGE 
to reinitialize all SADMP resources and rerun the virtual 
dump. 
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Diagram SADMP-42. AMDSASVI-—SVC Interruption Handler (Part 1 of 8) 


SVC 


Interrupt 


input Process Output 


PGOSVISA 









1 Save the registers in page 0. 












2 Determine whether this is a 


FLCSVCN Fbwe-—-—---4-—----- fae return SVC (X‘FC’) or a call 


SVC (all others}. 








Step 12 





@ If this is a return SVC, go to 
Step 12. 












FLCSVCN FLCOPSW 


CTSVCSTR svc 
Stack 





YY 3. Trace the call SVC. 






4 Put a new status element on to 
the stack and initialize it. 





e If the stack is full, call 
AMDSAAUD to dump SADMP, 
trace the call, and recover. 







AMDSAAUD 
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Diagram SADMP-42. AMDSASVI — SVC Interrupt Handler (Part 2 of 8) 


Extended Description Module Label 


1 AMDSASVI copies the registers at entry into PGOSVISA in page 8. 


2 AMDSASVI determines whether the SVC is a return SVC (FLCSVCN = X‘FC’) ora call SVC 
(FLCSVCN = X‘FC’). For a return SVC, AMDSASVI goes to Step 12. 


3 AMDSASVI makes a trace table entry (CTTRACE) showing the SVC old PSW and the interrupt 
code FLCSVCN. CTSVCSTV points to the SVC stack (SVCSTACK), which contains SVC status 
entries (SVCSTAT) for the current SVC calling sequence. 


4 AMDSASVI increases SSINDEX by one to add a new stack entry. If the stack is full, AMDSASVI 
branch-enters AMDSAAUD to terminate the caller. AMDSASVI copies contro] register | into 
SSTDCRI, CTASIDA into SSASID, CTASCBA into SSASCB, the SVC old PSW (FLCSOPSW) 
into SSPSW, the caller’s save area address (PGOSR13) into SSSAR13, the caller’s return point 
address (PGOSR 14) into SSORIGI4, and the SVC number (FLCSVCN) into SSNUM. 
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Diagram SADMP-42, AMDSASVI-SVC Interruption Handler (Part 3 of 8) 


Input 






SVC Linkage Table, 
Indexed by SVC 
Number (F LCSVCN) 





CTSTDM CTASCBM CTSTOD 


a ee 


CTASIDD CATASCBD 


| 













Set enablement bits for |/O, 
external, and machine check 
interrupts. 


Output 
SVC Old PSW 


PGOSVISA 
7 


PGOSR1 


Control Register 1 CTASIDA 


| IL 


Determine whether to execute in CTASCBA Control Register 4 


the master scheduler address 
2 
2 D 


space or the dump address space. 
SVC Old PSW 


Set DAT on or off. 


if necessary, change the address 
in register 1. 


Put address of called module into 
PSW. 
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Diagram SADMP-42. AMDSASVI-—SVC Interruption Handler (Part 4 of 8) 


Extended Description 


5 = The called module has an entry in the SVC table 
SVCTABLE indexed by the SVC number. The 

table entry SVCLINK describes the environment and the 

entry point address to be given control. |f SLDISABL=ON, 

AMDSASVI turns off the |/O, external, and machine 

check enablement bits in the SVC old PSW. If 

SLENABL=ON, AMDSASVI turns these bits on. 


G§ If SLDATOFF=ON, AMDSASVI turns off the DAT 
bit in the SVC old PSW. If SLDATON=ON, 
AMDSASVI turns on the DAT bit. 


7 If SLREG1=ON, the caller is passing a parameter in 
register 1 that may need to be relocated because the 

two routines have different DAT modes. Change the 

address in register 1 from virtual to real or from real 

to virtual, if this is required. 


8 AMDSASVI determines whether to execute in the 
master address space or the dump address space. 

If the called module is DAT-on and SLASIDD=ON, the 

called module runs in the dumped address space. 

AMDSASVI sets control register 1 to CTSTDD, CTASIDA 

to CTASIDD and CTASCBA to CTASCBD. 


C 


Extended Description 


if the caller module is DAT-on, SLCR1=ON and control 
register 1 equals CTSTDD; the called module runs in the 
dumped address space. 


lf the caller module is DAT-on, SLCR1=ON and control 
register 1 equals CTSTDM; the called module runs in the 
master address space. AMDSASVI sets control register 1 
to CTSTDM, CTASIDA to CTASIDM and CTASDBA to 
CTASCBM. 


If the called module is DAT-on, SLCR1=OF F and either 
SLMASTER=ON or the caller is DAT-off, the called 
module runs in the master scheduler address space. 


If the called module is DAT-on and none of the above 
is true, the called module runs in the currently active 
address space. 


Q AMDSASVI stores SLADDR into PSWIA in the 
SVC old PSW. 
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Diagram SADMP-42. AMDSASVI-SVC Interruption Handler (Part 5 of 8) 


Input 





Save area in new SVC stack entry. 





SVC Linkage Table, indexed by 
SVC number in top SVC stack 









Provide a save area for the 
called module. 


11 Point the caller’s register 14 to a 
return SVC instruction. 


If necessary, restore caller's 
register 1. 


Restore the original value of 
registers 13 and 14, and the 
caller’s PSW. 


14 Trace the return, using the 
return SVC number and the 
orginal SVC old PSW. 





Output 
PGOSVISA 
PGOSRB Save Area 
X’'OAFC’ a 


PGOSR14 


_ 
Q) 
= 
n 
> 


PGOSR1 


PGOSR13 
PGOSR14 


SVC Old PSW 


+ 
ad 
> 
0 
m 


New Entry 
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Diagram SADMP-42. AMDSASVI-SVC Interruption Handler (Part 6 of 8) 
Extended Description Modules Label 


1Q AMDSASVI points the called module’s register 13 at 
PGOSR13 to the SVC stack entry save area SSSAVE. 


11 |if SUENCR=OFF, AMDSASV!I points the called 

module's register 14 at PGOSR14 to the return SVC 
instruction at PGOSVCRT register 15 to the called mod- 
ule’s entry point. 


12 For return SVC s, AMDSASVI uses the top SVC stack 
entry and the SVC Iinkage table entry for the module 


being returned from. 


if SLREG1=ON in the tinkage table entry and DAT mode 
is being changed, AMDSASVI relocates the caller's 
register 1, 


13 AMDSASVI copies SSAR13 into PGOSR13, 
SSOR!IG14 into PGOSR14, and SSPSW into the SVC 
old PSW FLCSOPSW. 


14 AMDSASVI adds an entry to the trace table, using 
the return SVC number and the original SVC old 
PSW. 
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Diagram SADMP-42. AMDSASVI-SVC Interruption Handler (Part 7 of 8) 


Input Process 


15 Restore the caller's control 
register 1, the ASID, and the 
ASCB. 





SVC Stack 
ba 
_ 
3 
os 


PGOSVISA 


| ft, 17 Restore registers from page 0. 


FLCSOPSW 


pT TT 18 Pass control to the new 


environment. 





> 1G Obtain the next SVC in the stack. 





LPSW (FLCOPSW) 


Output 
Control Register 1 












CTASCBA 


| 


SVC Stack 








General Registers 











CTASID 


| 


Contro! Register 4 


Primary 
ASID 
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Diagram SADMP-42. AMDSASVI-—SVC Interruption Handler (Part 8 of 8) 
Extended Description Module Label 


15 AMDSASVI loads control register 1 from SSSTDCR1, 
then copies SSASID into CTASIDA and SSASCB 
into CTASCB. 


16 AMDSASV! decreases SSINDEX to obtain the next 
SVC in the stack. 


17 AMDSASVI copies CTASIDA into control register 4 
and loads all 16 general registers from PGOSVISA. 


18 AMDSASV! loads the modified SVC old PSW 
FLCSOPSW. 
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Diagram SADMP-43. AMDSATER-— Virtual Storage Dump Tape Error Recovery (Part 1 of 2) 


Input Process Output 


Register 1 10DB 


od SS ————. T Locate the CCW to be restarted. | 
4 Translate the channel program 
_ 


> 
to virtual. 
IODB 
[| ?TRANSCHP SVC (SVCSIO) 
lODBSCSW ee 3 Check for error conditions and 


ie take appropriate action. 


| 


lODBSENS 


RESCCWA 


ee —— 4 Retry the I/O. 


SVC (SVCSIO) 


5 If the error cannot be remedied 
or the retries have been exhausted, 
get a new tape or terminate. 


AMDO51A 


Error Messages AMDO33! 
AMDO34! 
AMDO31) 


Old Tape 
Unloaded 


c « c 


NEWTAPE 





Mccal 


7ERROR DUMP TERMINATE SVC (SVCAUD) 
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Diagram SADMP-43. AMDSATER — Virtual Storage Dump Tape Error Recovery (Part 2 of 2) 


Extended Description Module Label 


1 AMDSATER locates the CCW to be restarted. [ODBCCWA contains the address of the channel 
program to be restarted. If the CCW to be restarted is data chained, AMDSATER decreases the 
address of the CCW by the length of a CCW to obtain the starting CCW that failed. IODBSCSW 
also contains the IRB status information. 


2 AMDSATER translates the channel program to be restarted from rea] to virtua] addressing. 


3 The IRB status (IODBCSW) and the sense data pointed to by IODBSENS define the error and the 
appropriate action. 


4 The CCWA contains the address of the CCW that is to be retried. AMDSATER calls AMDSASIO 
(via an SVC macro) to retry the I/O, and executes steps 1 - 3 until the 1/O is successful or until the 
retry count is exhausted. AMDSATER issues the recovery retry I/O and does not wait for the I/O to 
complete. If an error recurs, a new call to AMDSATER handles the error. AMDSATER is disabled, 


SO no recursion can exist. 


5 If the error is uncorrectable, or if the number of retries is exhausted, AMDSATER attempts to 
recover by obtaining a new output tape. AMDSATER passes control to entry point AMDSANTP 
via an SVC if the error is a data check, equipment check, a file protection exception, an intervention 
required, a loadpoint error or end-of-reel condition. If recovery fails, or if AMDSATER cannot 
obtain a new tape, AMDSATER issues message AMD033] to the console. If SENSE data is 
available, AMDSATER also issues message AMDO34I]. If AMDSATER has no output tape left to 
write to, it issues message AMDO31I and terminates SADMP. 
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Diagram SADMP-44. NEWTAPE-Subroutine of AMDSATER (Part 1 of 2) 


Input Process 


Tape |[ODB 


1 Write a tape mark and demount 
the old tape. 





Input 
Message 
ID 


2 Get anew tape. 


3. Read the label, 





4 If there is an error reading the 
label, reject the tape. 


NTVLSP 


eS eee & HReject password protected tape. 


NTVLSP 


ee 6 Ask operator whether to use an 


unprotected labeled tape. 


Return to caller 








Output 


Old Tape 
Unloaded 


AMD032! 
(Failure to 
Write Tape Mark) 


AMDOXXA New 
Tape 


=< 
—| 
< 
rm 
w~ 
"0 


AMD047A 


AMDO50A 


AMDO045D 


AMDO049]) 


OOUOL 


New tape rewound and 
ready to use. 


O) 
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Diagram SADMP-44. NEWTAPE-Subroutine of AMDSATER (Part 2 of 2) 


Extended Description Module Label 


1 AMDSANTP writes a tape mark to the old output 

tape. If the write tape mark fails, AMDSANTP 
issues message AMDO32!. AMDSANTP then rewinds 
and unloads. 


2 AMDSANTP issues message AMD019A, AMDOO4A, 

or AMDO51A to request mounting of a new tape. 
If the output tape is a 3480 tape drive, AMDSANTP 
writes an appropriate display message to the tape drive. 
Then AMDSANTP waits for the tape to be loaded. 


3 AMDSANTP reads the label on the tape. If the 
tape has no label, AMDSANTP accepts the tape. 


4 If the tape has a label that cannot be read, 
AMDSANTP rejects the tape and issues message 
AMDOSOA to request mounting of another tape. If the 
output tape is a 3480 tape drive, AMDSANTP writes an 
appropriate display message to the tape drive. 


5 sif the tape is password protected, AMDSANTP 

rejects the tape and issues message AMD047A to 
request mounting of another tape. If the output tape 
is a 3480 tape drive, AMDSANTP writes an appropriate 
display message to the tape drive. 


G _siIf the tape has a label that can be read, and the tape 
is not password protected, NEWTAPE issues message 

AMDO45D to ask the operator whether to use the 

labeled, unprotected tape. If the operator does not give 

a correct reply to message AMDO045D, NEWTAPE issues 

message AMDO49I to inform the operator of the syntax 

error. 


lf the operator rejects the tape, NEWTAPE asks the 
operator to mount another tape, and repeats steps 3-6. If 
the operator accepts the tape, NEWTAPE returns to the 
caller. 


See Diagram 45. AMDSATS80 — Virtual Storage Dump. 


WAI Jo Ajsodoig — sjetia}eyA] pasuadry] 


NGI JO S[B19}B A] pa}d1IjSsey surejUO; 


o1Z0] Spry solasag aimoaIIYoIW pepusIxd/SAW ZI[-p 


S861 7861 ‘di0D WI 1481IAdOD © 7-681 I-8ZAT 


Diagram 45. AMDSATS80- Virtual Storage Dump Tape Error Recovery for 3480 Tape Drives (Part 1 of 6) 


Input 


Register 1 








Process Output 





1 Locate the CCW to be 
restarted. 


2 Translate the channel program 
to virtual, 


? TRANSCHP SVC (SVCTCP 


3 Terminate if sense command 
error occurs. 


AMDO033! 


l\ODBSENE 


AMDO31I 


?7ERROR DUMP Disabled wait PSW 


TERMINATE SVC (SVCAUD) 
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Diagram 45. AMNSAT80—Virtual Storage Dump Tape Error Recovery for 3480 Tape Drives (Part 2 of 6) 
Extended Description Module Label 


1. AMODSATS8O locates the CCW to be restarted. 

IODBCCWA contains the address of the channel 
program to be restarted. If the CCW to be restarted is 
data-chained, AMDSATS80 decreases the address of the 
CCW by the length of a CCW to obtain the starting CCW 
that failed. 


2 $AMDSAT80 translates the channel program to be 
restarted from real to virtual addressing. 


3 iif an error occurred on the sense command issued 

previously by the |/O services, AMDSATS80 writes 
error messages AMDO33! and AMDO311 and terminates 
SADMP. 
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Diagram 45. AMDSATS80-— Virtual Storage Dump Tape Error Recovery for 3480 Tape Drives (Part 3 of 6) 


Input 


lODBSCW 


IODBSENS 





Process 


Check for error conditions 
and false appropriate action. 


Ratry the 1/O. 


If retry is not warranted, get a 
new tape or satisfy the inter- 
vention required condition. 


SVC (SVCNTP) 


Output 


AMD033! 


< 


SVC (SVCSIO) Old tape 


New tape unloaded 


id 


Error messages 


AMDO04A 
AMDO19A 
AMDO51A 


AMDO34| 


AMDO014A 
SVC (SVCINR) < ) 
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Diagram 45. AMDSAT80-— Virtual Storage Dump Tape Error Recovery for 3480 Tape Drives (Part 4 of 6) 


Extended Description 


4 The sense data and the IRB status pointed to by 

I\ODBSCSW define the error and the appropriate 
action. AMDSATS80 Issues messaga AMDO0331 to notify 
the operator what type of |/O error occurred. 


5 sif the error is a channel data check, a chaining 

check, a demark data buffer error, an environ- 
mental data present error, a block id sequencing error, 
a degraded mode error, or a Jog and retry error, 
AMDSATSO0 retries the channel program. 


G if the error Is a tape length error, a unit exception, 

or a file protected error, AMDSATS80O informs the 
Operator via a message to mount a new tape. 
AMDSATSO passes control to AMDSANTP via an SVC. 
AMDSANTP rewinds and unloads the old tape and 
obtains a new tape. 


If the error is an intervention required condition, a drive 
reset error, a manual unload error, a load failure or a 
load assistance error, AMDSATS8O Informs the operator 
that intervention is required on the tape drive and passes 
control to AMDSAINR via anSVC. AMDSAINR han- 
dies the intervention required processing. 


Module 


Label 
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Chapter 4. Stand-Alone Dump (AMDSADMP) 


LY28-1189-2 © Copyright IBM Corp. 1982 1985 


O180] Spry solAJag sINJONITYDIY PepUsIXa/SAW QQI-p 


S86I Z86I “d1I0D Wa] IYSuUAdOD © 7-681 I-8ZAT 


Diagram SADMP-46. AMDSAUCB-—UCB Search and IODB Update (Part 1 of 6) 


Input 


Register 1 


UCBRCB 


IODBPTR 





Process 





UCB 
a =: 1 e 
RCB Queue ® 
oO 
1ODB 


Output 


Receive the input UCB 
address. 


Enqueue the UCB RCB. 


— If there is an unexpected 
program check, set an 
error return code and exit. 










Return to the 
Caller 






Preset a return code. 


————SSSSSS 2 Search for an |ODB. 


— {f no |ODB is found: 


UCBOB 


eS ———————.._...-_ 


® Create an !|ODB,SCHIB, 
sense data area, and DDXD. 


@ Check the validity of the 
UCB. 


’VCHK 


— (if the UCB is invalid, set an 


error return code. 


UCBRCB 


Register 15 


Register 15 


l\ODBUCB 

lIODBSCHB 
IOOBSENS 
l|ODBDDX 





Register 15 
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Diagram SADMP-46. AMDSAUCB-— UCB Search and IODB Update (Part 2 of 6) 
Extended Description Module Label 


AMDSAUCEB converts a UCB address into an |ODB 
address for the macro interface 710 OPEN. 


1  AMDSAUCB sets up the UCB base map, enqueues a 

UCB RCB, and presets a return code of O. If 
AMDSAUCEB encounters an unexpected program check 
whan it tries to enqueue the UCB RCB, AMDSAUCB 
sets an error return code of 20 and exits. 


2 AMDSAUCEB searches the queue for an |ODB to 

match the UCB. If AMDSAUCB does not find a 
matching {ODB, AMDSAUCEB creates an !ODB, and 
a corresponding SCHIB, sense data area, and a DDXD, . 
then calls 7?VCHK to check the validity of tha UCB. If ’VCHK 
the UCB is invalid, AMDSAUCEB sets an error return 
code of 4. 
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Diagram SADMP-46. AMDSAUCB—UCB Search and IODB Update (Part 3 of 6) 


Input Process Output 










tODBSCH 


BE 3s Check subchannel ID. Register 15 


— |f the subchannel ID is 
invalid, set an error return 
code. 


Register 1 (ODBSCH 


— ff the subchannel is not 
operational, set an error 
return code. 


SCHV 
Bo Eo) 5 Cheek the subchannel device 
number. 
SCHV Register 15 


BQ Sf the subchannel device 


number is invalid, set an 
error return code. 
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Diagram SADMP-46. AMDSAUCB-— UCB Search and IODB Update (Part 4 of 6) 


Extended Description Module Label 


3  AMDSAUCB checks the subchannel 1D. |f the sub- 
channel is invalid, AMDSAUCEB sets an error return 
code of 8. 


4 AMDSAUCB enables the subchannel. 1f the sub- 
channel is not operational, AMDSAUCB sets an 
error return code of 12. 


F AMDSAUCB checks SCHV, the subchannel device 
number. If the SCHYV is invalid, AMDSAUCB sets 
an error return code of 16. 
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Diagram SADMP-46. AMDSAUCB-UCB Search and IODB Update (Part $ of 6) _ 


Input 
IODBNG IODBUNAV 
[i holo. oe 
Ce or = a 


RCB Queue 
UCBRCB 


eee 





Process 


G Verify that the device can be 
used. 


e If the 1ODB is invalid, sets 
fields and issues a message. 


e if an iODB is found, check 
if device can be used. If the 
device cannot be used, set 
an error return code. 


if this device is a paging storage 
device and the current UCB is 
for the base exposure, call 
AMDSAUGCEB to get the |ODB 
for the paging exposure and 
attach it to the base IODB. 


7 

8 Dequeue the UCBRCB, return 
the |ODB address, and return 
to the caller. 











Output 


| oer 


710 


SVC(SVCUCB) 





lIODBNG lIODBUNAV 


AMDOS58iI 


= 
a 
@ 
O 


Register 15 


Paging |ODB 
Base |ODB = 
IODBBASA 
IODBPXPA 
DDXD 
DDX| 
Original 
Queue 
Register 1 IODB 
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Diagram SADMP-46. AMDSAUCB-—UCB Search and IODB Update (Part 6 of 6) 


Extended Description Module Label 


6 AMDSAUCEB attempts to open the device that the 
IODB represents. If the IODB is invalid and the 
device cannot be opened, AMDSAUCEB indicates that the 
IODB is invatid and marks the IODB as unavailable. 
AMDSAUCEB calls 710 to issue error message AMDO58I. If 710 
AMDSAUCB finds a matching |ODB for the UCB, 
AMDSAUCB verifies that the device can be used. If the 
device cannot be used, AMDSAUCEB sets an error return 
code of 20 and exits. 


J «The device is a paging storage device if it is a multiple- 

exposure 3350 (UCBTBYT4 = DT3350 and 
UCBMTPXP is on). AMDSAUCEB turns on IODBPGST to 
indicate that the device is a paging storage device. 
AMDSAUCE creates the DDX!}. 


8 AMDSAUCB dequeues the UCB RCE, returns the 

1ODB address in register 1, and returns to the caller. 
If the device is a paging storage device, the |ODB returned 
is for a paging exposure. 
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Diagram SADMP-47. AMDSAUPD—Page-In Management (Part 1 of 6) 


PGI 
AMD Se Process Output 


Input 


SAVE 1412 
1 Save registers in save area. 


2 Call AMDSABUF to obtain 
BCT for page in. 


Register 1 BCT 
AMDSABUF [___) 


m 
O 
O 
Oo 
m 


— If AMDSABUF fails, 
set an error code. 


x‘01’ = ECBUF 


3, Call AMDSARSM to check 
page availability. Register 15 


AMDSARSM [__ ) 


Return Code 


Register 15 


e If AMDSARSM fails to find a oie = ECRSMP 
page, set an error code. 


e If AMDSARSM fails to find a 
page table, set an error code. 


X'10° = ECRSMS 


e If AMDSARSM fails with the 
address space, set an error code. 


x’04’ = ECRSMA 
Buffer 


m m m 
© C). O 
Oo Oo Oo 
O Oo O 
mi m m 


Page is read into 


® If the page is available in real storage, 
buffer. 


reclaim page. 


nil 


SVC (SVCDOS) 
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Diagram SADMP-47. AMDSAUPD — Page-In Management (Part 2 of 6) 
Extended Description 


Module Label 


AMDSAUPD saves the entry registers in the save area provided by AMDSASVI. 


AMDSAUPD calls AMDSABUF to obtain a BCT for a page in. If AMDSABUF fails to get a BCT, 
AMDSAUPD sets the error code to X’01’ and terminates. 


AMDSAUPD calls AMDSARSM to check if the page is available. If AMDSARSM fails to find the 
page, AMDSARSM sets a return code of 12 and AMDSAUPD sets the error code to X’11’. If 
AMDSARSM fails to find the page table. AMDSARSM sets a return code of 16 and AMDSAUPD 
sets the error code to X’10’. If AMDSARSM fails with the total address space, AMDSARSM sets a 
return code of 20 and AMDSAUPD sets the error code to X’04’. If AMDSARSM determines that 
the page is available in real storage, it sets a return code of 4and AMDSAUPD reclaims the page. 
AMDSAUPD reclaims the page by calling AMDSADOS via SVC to copy the page into the buffer. 


If AMDSARSM has paged the page in, AMDSARSM sets a return code of 0. In this case, 
AMDSAUPD does nothing to bring the page in. 
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Diagram SADMP-47. AMDSAUPD-—Page-In Management (Part 3 of 6) 


input 


Register 15 


Register 15 





Process 


If the page is on auxiliary 
storage, call AMDSAASM to 
get IODB. 


if AMDSAASM fails, set an 
error code. 


if AMDSAASM succeeds, read 
the page. 


If unable to read the page into 
the buffer, set an error code. 





Output 


AMDSAASM [__ 


Register 15 


Page is read 
into buffer. 


= ECREAD 
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Diagram SADMP47. AMDSAUPD—Page-In Management (Part 4 of 6) 


Extended Description Module Label 


If AMDSARSM determines that the page is on auxiliary 
storage, AMDSARSM sets a return code of 4. AMDSAUPD 
then calls AMDSAASM to get the |ODB address for the 
page. If AMDSAASM fails, it sets a nonzero return code, 
and AMDSAUPD sets the error code to X‘05’. If 
AMDSAASM succeeds, AMDSAASM sets a return code 

of OQ and AMDSAUPD reads the page into the BCT. If 
AMDSAUPD cannot read the page into the BCT, 
AMDSAUPD sets the error code to X’06’. 
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Diagram SADMP-47. AMDSAUPD—Page-In Management (Part 5 of 6) 


Input 





BCT 


——______ "> 5 Write the page to tne dump 


Output Process 











4 Call AMDSABUF to obtain 
BCT. 






Register 1 












@ If AMDSABUF fails, = ECNOSBUF 


set an error code. 






tape and return. 







Page dumped 
to tape. 






Return 
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Diagram SADMP-47, AMDSAUPD—Page-In Management (Part 6 of 6) 
Extended Description Module Label 


4 AMDSAUPD calls AMDSABUF to obtain a buffer. 
lf AMDSABUF fails, AMDSAUPD sets the error 
code to X’07’. 


f AMDSAUPD calls 710 to dump the page to tape. 

AMDSAUPD returns to the previous save area. The 
return linkage of AMDSAUPD is via AMDSASVI to the 
point of interruption where AMDSAPGI originally had 
control. 
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Diagram SADMP-48. AMDSAVCK-—Virtual Storage Dump Validity Check (Part 1 of 4) 


Input Process Output 


Register 0 








1 Save the ID and address of the 
control block to be checked. 


VCKRCB 
2 Enqueue the validity check C8 4 Lf E | 


RCB. 
New RCB 


CBADDR 





Register 1 





Original 


RCB Queue RCB Queue 


3 > «Perform a validity check 


appropriate to the control 
block ID. 
7ERROR REASON 
@ For an unknown contro! block (ECUNKN) 
1D, dequeue the validity check DUMP RECOVER 


RCB from the RCB queue and 
cail for a dump. Register 15 


A Seta return code for failed validity pa 
checks and issue a message for 
CBERO18 = ‘MISSING’ invalid control blocks. 
710 MSGID. 
(AMDO181) 


CBERO18 ="INVALID’ 





Cc 
e 
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Diagram SADMP-48. AMDSAVCK — Virtual Storage Dump Validity Check (Part 2 of 4) 


Extended Description Module Label 


1 AMDSAVCK saves the ID and address of the control block to be checked. 
2 AMDSAVCK enqueues the validity check RCB. 


3 AMDSAVCK performs the validity check appropriate to the contro] block ID. The control blocks 
whose IDs might be checked are: 


the RAB 
ASCB 
ASXB 
ASVT 
EDB 
GTFBCB 
MCCE 
MCQE 
PART 
SGT 
LPMB 
UCB 
ASMVT 
TCB 
SART 
EST 


For an unknown control block ID, AMDSAVCK dequeues the validity check RCB from the RCB 
queue and requests a dump. 


4 AMDSAVCK sets a return code of 4 for failed validity checks and issues message AMDO18I for 
invalid control blocks. 
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Diagram SADMP-49, TCBSCAN—Scan TCBs for this Address Space and Dump Associated Subpools (Part 1 of 2) 


Input 


VSMWORK 


VSMLIST input 
parameters with 
subpools. 


Z 


TCB chain 


ASXB 


ASXBFTCB 


ASXBLTCB 





Process Output 


1 Check the validity of the ASXB. 


2 Scan the TCB chain backwards 
and process each TCB. 





3 Check the validity of each TCB. 


?VCHK 


4 Call VSMLIST to translate the 
subpools and TCBs into address 
ranges. 












SVC (VCKSVC) 
VSMWORK 


2?VSMLIST VSMLIST ey 
Storage Blocks 
(Address and 
Length) 
5& Call AMDSAARD to dump the 
storage. 
SVC (SVCARD) F__) 


G If the TCB backwards search stops 
prematurely, repeat steps 2 
through 5 using a forward search. 
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Diagram SADMP-49. TCBSCAN—Scan TCBs for this Address Space and Dump Associated Subpools (Part 2 of 2) 
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(dWAVSGWYy) duing suoly-purig “p iajydeyy 


SOcP 


Extended Description Module Label 


1 TCBSCAN calls AMDSAVCK to check the validity 
of the ASXB for this address space. 


2  TCBSCAN scans the TCB chain backwards, and 
processes each TCB. The head of the backward 


TCB chain is ASXBLTCB and the chain field is TCBBACK. 


3  TCBSCAN calls AMDSAVCK to check the validity 
of each TCB. 


4 TCBSCAN invokes the VSMLIST macro to translate 

into address ranges all the subpools that are to be 
dumped in this address space that are also associated with 
this TCB. 


5 TCBSCAN calls AMDSAARD to accumulate and 
dump the address ranges. 


6 If TCBBACK is O during the backward scan, the TCB 

Queue is broken, Rescan the TCB queue in the for- 
ward direction by beginning from ASXBFTCB and chain- 
ing from TCBTCB. TCBSCAN repeats steps 2—5. 
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Method of Operation for the Logic Tool material - 


This section has detailed information for AMDSADMP modules. These modules 
are in alphabetical order. The information is broken down into four separate 
headings. The four headings and the topics they include are: 


Module Description,: 


@ Descriptive name 
@ Function (of the entire module) 
@ Entry point names: 
— Purpose (of the entry point) 
— Linkage 
— Callers 
— Input 
—- Output 
— Exit normal 
— Exit error, if any 
@ External references: 
— Routines 
— Data areas, if any 
— Control blocks 
@ Tables, if any 
@ Serialization, if any 


Note: These modules are also included in the System Logic Library. 





Module Operation: 


@ Operation, which explains how the module performs its function. 
@ Recovery operation, which explains how the module performs any 
recovery. 


Diagnostic Aids, which provide information useful for debugging program 
problems: 


Entry point names 

Messages 

Abend codes 

Wait state codes 

Return codes for each entry point. Within each entry point, return codes 
might be further categorized by exit-normal and exit-error. 

Entry register contents for each entry point 

Exit register contents for each entry point, which might be further 
categorized by exit-normal and exit-error. 


Logic Diagram, which illustrates the processing of the module, the input it 
uses, the output it produces, and the flow of control. Some modules do not 
have a logic diagram because the processing is sufficiently explained in the 
module description, module operation, and diagnostic aids sections. 

Figure 4-2 on page 4-207 illustrates the graphic symbols and format used in 
the logic diagram. 
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Kay to Symbols Used in Method—of—Operation Diagrams 


Primary processing - indicates major funtional flow. 


within a diagram. 


===) Secondary processing - indicates functional flow 


Data movement, modification, or use. 


Se Data reference -- indicates the testing or reading 
of a data area to determine the 
course of subsequent processing. 


Pointer -- indicates that a data area contains the 
address of another data area. 


Connector - indicates that a diagram is 
continued on the next page. 





Figure 4-2. Graphic Symbols and Format Used in the Logic Diagram 
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AMDSADCM = MODULE DESCRIPTION 


DESCRIPTIVE NAME: Console Message Dump. 


FUNCTION: 
Writes virtual dump console messages to the output tape. 


ENTRY POINT: AMDSADCM. 
PURPOSE: See FUNCTION. 
LINKAGE: BALR. 

CALLERS: None 


INPUT; 
Standard parameter list: 
1. DCMIFUNC - function code (fullword). 
- OPEN (DCMIFUNC=DCMFOPEN ) 
- PUT (DCMIFUNC=DCMF PUT ) 
- WRITE (DCMIFUNC=DCMFWRIT ) 
2. DCMITYPE - message type (PUT only, 1 byte). 
3. DCMILEN - message length (PUT only» 1 byte 
positive integer). 
G. DCMITEXT - message text (PUT only). 


OUTPUT : 
OPEN - AMDSADCM marks the message dump service ready 
for use or unusable. 


PUT - If the message length is zero, AMDSADCM 
ignores the request. If there is a current 
buffer available, AMDSADCM places the message 
into the message buffer, and writes all full 
buffers to the output tape. If there are no 
buffers available, AMDSADCM increments the 
count of discarded messages and sets the 
module return code to 4. Note: Messages 
longer than 79 characters are truncated to 79 
characters. 





WRITE - If the output tape is usable, AMDSADCM writes 
all buffered messages to tape. If an error 
occurs while attempting to use tha output tape, 
AMDSADCM marks the message dump service 
unusable and sets thea module return code to 4. 


EXIT NORMAL: To caller via BR 14. 
EXIT ERROR: To caller via BR 14. 
EXTERNAL REFERENCES: 


ROUTINES: 
AMDSAGTM (SVC) - Gets and frees storage. 
AMDSASIO (SVC) - Writes a message buffer to the output tape. 
AMDSABUF (SVC) - Gets buffers. 
AMDSASVI (SVC interrupt handler ) 
For SVC modules with name AMDSA---, linkage 
is by SVC(SVC---) or SVC(---SVC). 


CONTROL BLOCKS: 
C=created, R=referenced, M=modified, D=deleted 
All are private to Stand-Alone Dump. 
CCT R - Common Control Table 





RCB CRMD - Recovery Control Block 

IODB R - I/O Device Block 

DCM CRM~ = Console Message Dump descriptor 
DCMD CRMD - Console Massage Dump Data 
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AMDSADCM - MODULE OPERATION 


AMDSADCM performs a different function depending on the 
input function code (DCMIFUNC): 


- OPEN (DCMIFUNC=DCMFOPEN): Initializes the console 
message dump service by performing the following steps: 


1. 


2. 


Initializes the console message dump descriptor (DCM). 


Obtains storage for message buffers and puts the 
addresses of the buffers in the DCM. 


- Initializes the buffers. 
. Sets the “open" indicator, DCMOPEN, to l. 


. Resets the "unavailable" indicator, DCMUNAV, to 0. 


- PUT (DCMIFUNC=DCMFPUT): Processes the input message 
parameters: 


DCMICODE indicates the type of message and is passed 
directly to the tape. 

DCMITEXT is the variable-length message text. 

DCMILEN is the message length. 


Note: The console message dump data 
mapping DCMD maps the message output 
buffers, each of which holds 
approximately 50 messages of 79 
characters each. 


PUT processing performs the following steps: 


l. 


If the console message dump service is 
functional, and the input message text has 
nonzero length, AMDSADCM places the 
message into the current buffer. 


Note: Messages longer than 79 characters 
are truncated to 79 characters. 


If there is no current buffer, AMDSADCM 
attempts to obtain a new buffer. If there 
are no more buffers, AMDSADCM increments 
the count of discarded messages. If there 
1s no more room in the message dump 
address space, AMDSADCM indicates this in 
the buffer (DCMDSMAX=1), and marks the 
console message dump service unavailable 
(DCMUNAV=1 ). 


. If the current buffer is full, AMDSADCM 


marks the buffer full, and writes full 
buffers to the output tape. 


. If the console message dump service is not 


functional, AMDSADCM sets the module 
return code to 4. 


PUT cannot guarantee that every message will 
appear in the dump output because it must 
postpone message writing during tape error 
recovery. It is possible (but not likely) that 
error recovery may generate enough messages to 
fill up all available buffers. Furthermore, the 
message dump address space is of finite size. 
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AMDSADCM - MODULE OPERATION (Continued) } 
Finally, PUT cannot write messages to a tape that 
has been rewound. 
In the absence of SADMP internal errors, AMDSADCM 
will almost always have enough buffer space to 
dump any messages except those that appear after 
the dump output device has been logically closed. 
- WRITE (DCMIFUNC=DCMFWRIT): Performs the following steps: 
-- 1. Changes the status of the current buffer to full. 


-- 2. Attempts to write all full buffers to the output tape. 


Buffer State Transition Diagram 


$2=5>====-=>- + GETCURR $===$55==5==- + 
+--->| Empty | ------------- >| Current = |----+ 
| | (DCMSEMPT) | | (DCMSCURR) | I 
| $------------ + $-<---------- $ | 
| | 
| WRITEALL | FULLBUFF 
| (1/0 successful ) | 
| | 
| tooo -------- + WRITEALL) +¢------------ “ | 
+----| Write | <------++----- | Full [<---+ 

| (DCMSWRIT) |------------- >| (DCMSFULL) | 

$------------ + WRITEALL +¢------------ + 


(I/O failed) 


RECOVERY OPERATION: 
Marks the console message dump service unusable by setting 
DCMUNAV=1 and exits with return code 4. 
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AMDSADCM - DIAGNOSTIC AIDS 


ENTRY POINT NAMES: AMDSADCM. 


MESSAGES: None 


ABEND CODES: None 


WAIT STATE CODES: None 


RETURN CODES: 
EXIT NORMAL: 

AMDSADCM returns a 0 in register 15. 
EXIT ERROR: 


AMDSADCM returns a 4 in register 15. 


REGISTER CONTENTS ON ENTRY: 


Rl - Points to standard parameter list. 
R13 - Points to caller's save area. 

R14 - Return address. 

R15 - Entry point address. 


REGISTER CONTENTS ON EXIT: 
EXIT NORMAL: 


RO thru R14 - same as at entry. 
R15 - Contains return code. 


EXIT ERROR: 


RO thru R14 - same as at entry. 
R15 - Contains return code. 
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AMDSADCM = Console Message Dump. STEP 01 





N Writes virtual dump console messages to 
>| | the output: tape. 
PARAMETERS / 
AMDSADCM 
DCMIFUNC DCMITYPE \ 
Sets up the recovery \AMDSARMK 

environment. / 
PARAMETERS jo > If the “open” function is 

requested, performs OPEN 
AMDSARMK i ieee > feo 


03 If the "put" function is 
requested, performs PUT 
processing. 


AMDSARMK ot ee > sy 


\r—7 PUT: ll 
DCMFPUT 


If the “write” function is 
requested, performs WRITE 
processing. 


AMDSARMK face >| yey 


\r—2 WRITE: 16 
DCMFWRIT 


AMDSARMK \ If the request is not valid, 
/ sets the module return code 
RCDCMERR to 4. 


\ 
06 > Normal and abnormal exit: 
oe Deletes the recovery 
DCMEXIT environment. Returns to the 
module caller. 


RECOVER 
(DELETE, DCMRCB ) 





\ 7 
AMDSARMK ERREXIT Error exit: Sets the module 
\ return code to 4, sets the 
ON RCDCMERR / "DNCMUNAV™ indicator to 1 to 


indicate that the message 
dump service is unavailable, 
and goes to normal exit. 
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AMDSADCM - Console Message Dump. STEP 08 


>DCMEXIT: 06 











AMDSARMK 08 > 


aan | / 
DCMENDA DCMD : OPEN 
> 


AMDSARMK 


Opens the console message 
dump service. 







RCDCMERR 











Gets and initializes message \AMDSARMK 
dump buffers. [a 
SVCBUF 
AMDSARMK DE aceaeger > \AMDSARMK 
\ / 
BCTSGTEP 
AMNDSARMK Returns to the subroutine BCTKEYL 


caller. BCTKEY2 


BCTASID 
DCMDHDR 





AMDDATA 


PRDASCMD 


Puts a message in the 


console message dump. 





PARAMETERS | (en > [12] If the message service is 
- functional and message text 
exists, processes the 
message. 
A. If there is no current buffer, attempts 


to obtain a buffer. 


su 


\r—/ GETCURR: 28 


\| B. If unable to obtain a buffer, increments 
/ the lost message count, and sets the 
module return code to 4. 


AMDSARMK 







RCDCMERR 


C. If there is a current buffer and \AMDSARMK 
messages were suppressed because of / 
temporary lack of buffer space, accounts 
for lost messages. 
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AMDSADCM - Console Message Dump. STEP 12D 
AMDSARMK pr--cc----- >| D. Copies message to buffer. \AMDSARMK 
e \ / 


E. If buffer is full, marks buffer full. DCMDCODE 
PARAMETERS 


DCMDTEXT 





DCMILEN 


AMDSARMK 


PARAMETERS 
DCMITYPE DCMITEXT 


AMDSARMK a ---------- > 7 beemeel \ 
\re—1/ FULLBUF: 24 


DCMDNUM DCMDMSG 


[13] If the message service is 
functional, and message text 
exists, writes full buffers. 


fry 


Np 17 WRITEALL: 21 


AMDSARMK \ [14] If the message service is 
/ not functional, sets the 
RCDCMERR module return code to 4. 


[15] Returns to the subroutine 
caller. 





\ 7 


Attempts to write the 
current buffer to the tape. 


If the message service is 
functional and there is a 
current buffer, marks the 
current buffer full. 


fH, 


—[__ nae] 
If the message service is 


functional, writes all full 
buffers. 
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AMDSADCM - Console Message Dump. STEP 19 


a 


\re—7 WRITEALL: 21 


AMDSARMK 







19 If the message service is 
not functional, sets the 
module return code to 4. 


RCDCMERR 


20 Returns to the subroutine 
caller. 








\ 
21 > 21 Attempts to write all full 
/ buffers to the tape. 
WRITEALL 
[22] Loops through buffers. 
AMDSARMK ee >| A. If the buffer is full and it is possible 


to write to the tape, indicates that the 
buffer is being written, and writes the 
BCT to the tape. 





AMDSARMK P aaa >| B. If the write operation was successful; 
indicates that the buffer is now empty. 
BCTIO RCREG 


oO 


. If the write operation was NOT 
successful, indicates that the buffer is 
still full. 


Returns to the subroutine 
caller. 
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AMDSADCM - Console Message Dump. STEP 26 







26 Changes the status of the 

current buffer to full, and 
makes the message dump 
service unavailable if the 
message dump address space 
is full. 





FULLBUF 











[25] Marks the current buffer 
full. 





If the message dump address \AMDSARMK 
space is full, sets the 


/ 
"DCMUNAV™ indicator to 1 to Jocmostax, 
indicate that the message Dewstax 


dump service is unavailable. 


AMDSARMK cc ; 26 


DCMENDA DCMD 


AMDSARMK 






Returns to the subroutine 
caller. 


28 > Aa Searches for an empty buffer 
/ and makes it the current 
GETCURR buffer. 


Loops through buffers. 


AMDSARMK \]| A. If the buffer is empty, initializes the \AMDSARMK 
/ buffer, and makes the buffer the current / 
OFF PAGESIZE buffer. 


B. If an empty buffer has been found, exits 
the loop. 


BUF FLOOP 





30, Returns to the subroutine 
caller. 
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AMDSAFCM - MODULE DESCRIPTION 


DESCRIPTIVE NAME: Stand-Alone Dump Console Message Dump Formatting Module. 


FUNCTION: 

AMDSAFCM, when invoked by IPCS or AMDPRDMP, 
formats Stand-Alone Dump messages found in the 
console message dump. 


ENTRY POINT: AMDSAFCM. 

PURPOSE: See FUNCTION. 

LINKAGE: ATTACH from AMDPRDMP, LINK from IPCS 
CALLERS: None 


INPUT : 
ABDPL - AMDPRDMP/IPCS parameter list. 
ADPLSYNO - Syntax check operands only. 
ADPLSBPL - Subpool for dynamic storage. 
ADPLBUF - Address of output buffer. 
ADPLPRNT - Address of print routine. 
ADPLMEMA - Address of memory access routine. 


PRDSADP - Indicator that a Stand-Alone Dump is being processed. 


PRDASCMD - Console message dump ASID. 


DCMVBEG - First virtual address used to dump console messages. 
DCMVEND - Highest virtual address used to dump console messages. 


DCMDNUM - Index of last message in a DCMD. 
DCMDMSG - AMDSADMP console message array. 


OUTPUT: 


Formatted messages from console message dump, a message stating 
that it is not a Stand-Alone Dump being processed, or a message 


stating that no console message dump messages were found. 
Note: These messages do not go to the MVS operator's console. 


"366% STAND-ALONE DUMP VIRTUAL DUMP MESSAGE LOG 22" 
“3e0¢ THE DUMP BEING PROCESSED IS NOT A STAND-ALONE DUMP” 


"3ee% THERE ARE NO STAND-ALONE DUMP MESSAGE LOG BUFFERS 
IN THIS DUMP" 


"ee ANY FURTHER MESSAGES WERE SUPPRESSED BY STAND-ALONE DUMP 
BECAUSE THE MESSAGE DUMP ADDRESS SPACE WAS FULL" 


"ee dddddddddd MESSAGE LOG BUFFER(S) ARE MISSING, 
PROBABLY DUE TO I/O ERRORS DURING THE STAND-ALONE DUMP" 


"see dddddddddd MESSAGE(S) WERE SUPPRESSED BY STAND-ALONE DUMP 
DUE TO A TEMPORARY SHORTAGE OF BUFFER SPACE" 


EXIT NORMAL: To caller, via BR 14. 


EXIT ERROR: Percolation to caller's recovery. 
EXTERNAL REFERENCES: 


ROUTINES: ADPLESRV - Performs AMDPRDMP/IPCS read and print services. 


DATA AREAS: 
ADPLBUFR - Buffer containing a line to be printed. 
ADPLVIRT - Indicates a virtual dump record read request. 
ADPLHDR - Indicates a dump header record read request. 
ADPLASID - ASID for virtual dump record read request. 
ADPLDLEN - Length for virtual dump record read request. 
ADPLPAAD - Dump address to read. 
ADPLPART - Address of AMDPRDMP/IPCS buffer. 
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AMDSAFCM - MODULE DESCRIPTION (Continued) : 


CONTROL BLOCKS: 
C=created, R=referenced, M=modified, D=deleted 
=private to Stand-Alone Dump 
#DCMD R Console message dump data 
ABDPL RM Exit parameter list 
PRDINPUT R Dump title header record 
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C AMDSAFCM - MODULE OPERATION 


AMDSAFCM is a verb exit for IPCS and AMDPRDMP, and is 

invoked by the SADMPMSG control statement. AMDSAFCM processes 
Stand-Alone Dump messages found in the console message 

dump. It performs the following steps: 


1. AMDSAFCM attempts to read the dump header record, which 
indicates what type of dump is being processed. 


2. If the header can be read, and it indicates that the 
type of dump being processed is a Stand-Alone Dump, 
AMDSAFCM prints: 


"360 STAND-ALONE DUMP VIRTUAL DUMP MESSAGE LOG xx" 
and continues processing the dump. 


3. If the header can be read, and it indicates that the 
type of dump being processed is not a Stand-Alone Dump, 
AMDSAFCM prints: 


"360 THE DUMP BEING PROCESSED IS NOT A STAND-ALONE DUMP” 
and stops processing the dump. 


4. AMDSAFCM reads virtual dump records using the console 
message dump ASID (FFFA) starting with the first virtual 
address used by AMDSADCM to dump console messages. If 
the read for a record is successful, AMDSAFCM formats 
the Stand-Alone Dump messages in the record. 


5. AMDSAFCM reads records and formats messages until 
"*NODCMMAX” number of successive reads fail or the 
highest address used by AMDSADCM to dump messages 
yy is reached. This allows for the possibility of some 
records being missing due to I/0 errors without 
spending excessive time trying to read every record 
in the permitted range. 


6. If any reads fail, AMDSAFCM prints: 


"xe dddddddddd MESSAGE LOG BUFFER(S) ARE MISSING, 
PROBABLY DUE TO I/O ERRORS DURING THE STAND-ALONE DUMP”, 


7. If any messages were suppressed, AMDSAFCM prints: 


"3x dddddddddd MESSAGE(S) WERE SUPPRESSED BY STAND-ALONE DUMP 
DUE TO A TEMPORARY SHORTAGE OF BUFFER SPACE". 


8. If the dump header record cannot be read, or this is a 
Stand-Alone Dump and no DCMDs are found, AMDSAFCM prints 


"3e0¢ THERE ARE NO STAND-ALONE DUMP MESSAGE LOG BUFFERS 
IN THIS DUMP". 


This occurs, for example, when a real dump is taken 
without a virtual dump. 


9. If messages were suppressed due to lack of space 
in the message dump address space, AMDSAFCM prints: 


meee ANY FURTHER MESSAGES WERE SUPPRESSED BY STAND-ALONE DUMP 
BECAUSE THE MESSAGE DUMP ADDRESS SPACE WAS FULL". 


RECOVERY OPERATION: 
None. If an ABEND occurs and an ABEND dump DD (SYSUDUMP, 
SYSABEND, or SYSMDUMP) is allocated, MVS will take an ABEND 


C= 
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AMDSAFCM = DIAGNOSTIC AIDS ) 
ENTRY POINT NAME: AMDSAFCM. 

MESSAGES: None 

ABEND CODES: None 

WAIT STATE CODES: None 


RETURN CODES: 
EXIT NORMAL: 


0 


REGISTER CONTENTS ON ENTRY: 


Rl - Points to the ABDPL. 

R13 - Points to caller's save area. 
R14 - Return address. 

R15 - Entry point address. 


REGISTER CONTENTS ON EXIT: Irrelevant 
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AMDSAFCM - Stand-Alone Dump Console Message Dump Formatting Module. STEP O01 


‘\ AMDSAFCM, when invoked by IPCS or 
>| |AMDPRDMP, formats Stand-Alone Dump 


/ messages found in the console message 
AMDSAFCM# | | dump. 





BLSABDPL occ > O14 If not a syntax check only, 


prints the header and prints 


“Uy 

\r—7 PRINT: 08 
HEADER, LENGTH{( HEADER) 

vy 


\r—7 PRINT: 08 










BLANK, LENGTH( BLANK ) 


AMDSARMK \ 02 Tries to read the dump \BLSABDPL 





/ header record to determine 
ON OFF whether or not this is a 
Stand-Alone Dump. 


AMDDATA Z| ---------- > \BLSABDPL 


\ / 
A. If this is not a Stand-Alone Dump, 
AMDSARMK prints: "386¢ THE DUMP BEING PROCESSED IS 
NOT A STAND-ALONE DUMP". 


/ 
ADPLHDR 


sv 
\r-—7 













NSADMP , LENGTH( NSADMP ) 


B. If this seems to be a Stand-Alone Dum, 
formats and prints the console message 
champ data (DCMDs). 


74 
\r—7 FORMAT: 04 


BLSABDPL Sn > 


03 Returns to the module 


caller. 


\AMDSARMK 


‘el 


\N 74 
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AMDSAFCM = Stand-Alone Dump Console Message Dump Formatting Module. STEP 0G 


\ 
AMDSARMK 04 > Reads the DCMDs and prints \BLSABDPL 
y / their messages. / 
See ee == > 


ADPLDLEN 





AMDDATA 







ADPLVIRT 





AMDSARMK 


AMBSARMK ie > Reads and prints the DCMDs 
\ until "NODCMMAX™ number of 
/ successive reads fail or the 






end of the message dump 
address space is reached. 


ACCESS: 11 
BUFADDR, DCMDPTR 


A. If the prior reads failed, prints: ‘sex 
dedddddddd MESSAGE LOG BUFFER(S) ARE 
MISSING, *** PROBABLY DUE TO I/O ERRORS 
DURING THE STAND-ALONE DUMP", 


AMDSARMK 





su 
\r—7 


DCMBEGA DCMENDA 
PAGESIZE 










fsUuwuy 


"meee J 


B. If messages were suppressed because of a 
temporary lack of buffer space, prints: 
"3% dddddddddd MESSAGE(S) WERE 
SUPPRESSED BY STAND-ALONE DUMP x DUE 
TO A TEMPORARY SHORTAGE OF BUFFER 


SPACE". 
AMDSARMK Dea > sou 
\-—/ BUFSPMSG: 17 
DCMDLOST 
DCMDLOST 





AMDSARMK fe eee >| C. Converts the messages in a DCMD message 


\ array to upper case and prints them. 





DCMDPRNT 





FOLDAREA, LENGTH( FOLDAREA ) 


AMDSARMK e Gasca >| D. If messages were suppressed because of 


lack of space in the message dump 
address space, prints: '38@€ ANY FURTHER 

MESSAGES WERE SUPPRESSED BY STAND 

ALONE-DUMP x3 BECAUSE THE MESSAGE DUMP 


ADDRESS SPACE WAS FULL". 
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AMDSAFCM - Stand-Alone Dump Console Message Dump Formatting Module. STEP 06 


PARAMETERS 


LINE 


LEN 





PRINT: 08 
BLANK, LENGTH( BLANK ) 


PRINT: 08 
FURSUPP1, LENGTH( FURSUPPI ) 


PRINT: 08 
FURSUPP2, LENGTH( FURSUPP2 ) 


If no DCMDs are found in the 
dump, prints: "xxx THERE ARE 
NO STAND-ALONE DUMP MESSAGE 
LOG BUFFERS IN THIS DUMP". 


PRINT: 08 
NODCMDS, LENGTH(NODCMDS ) 


Returns to the subroutine 
caller. 























Prints a line using the 
AMDPRDMP/IPCS print service. 


Prints a line. 


\BLSABDPL 


/ 
ADPLBUFR 


ADPLESRV 


ABDPL,> ADPLSPRT 


Returns to the subroutine 
caller. 
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AMDSAFCM = Stand-Alone Dump Console Message Dump Formatting Modules. STEP 11 


N 
PARAMETERS ll > 


/ 
DUMPADDR DATAPTR ACCESS 

N 

/ 


\BLSABDPL 


/ 
ADPLPAAD 


Fe Reads a dump record using 
the AMDPRDMP/IPCS read 
service. 











[a2] Reads a dump record. 


ADPLESRV 


ABDPL,» ADPLSACC, ADPLPACC 





i 


AMDSARMK \PARAMETERS 


/ 
DATAPTR 
[3] Returns to the subroutine 


caller. 







BLSABDPL 


ADPLPART 


PARAMETERS 14 > Converts the data from \AMDSARMK 


/ FIXED(31) to printable / 
FIXEDIN DECOUT DECCONV decimal, inserts commas, and 
LENOUT \ supresses leading Zeros. 

/ Output is 'DD,DDD,DDD,DDD' 


left justified in DECOUT, 
with the length in LENOUT. 


PARAMETERS fpr > [5] Converts to printable \PARAMETERS 
\ decimal. / 
— 
DECOUT 
AMDSARMK Returns to the subroutine 






caller. 
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AMDSAFCM =- Stand-Alone Dump Console Message Dump Formatting Module. STEP 17 


PARAMETERS 17 > Prints a message indicating 


/ that messages were 

NUMSUPP BUFSPMSG suppressed by Stand-Alone 
\ Dump because of a temporary 
/ lack of buffer Space. 


Prints a blank line. 








BLANK, LENGTH(BLANK ) 


Converts the number of 
suppressed messages to — 
printable form. Adds this 
number to the message to be 
printed. 


soy 


N m7 DECCONV: 14 


NUMSUPP, MSGTEXT(MSGPOS1 )> 
NUMLEN1 





Prints the first and second 
message line and a blank 
ine. 


feoy 


\r7Z PRINT: 08 
MSGTEXT » EVAL(MSGPOS1-1 ) 
7-—N 


\r"12 PRINT: 0&8 


SUPP2, LENGTH{SUPP2 ) 


sey 


\—7 PRINT: 08 
BLANK, LENGTH( BLANK ) 


Returns to the subroutine 
caller. 
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AMDSAFCM = Stand-Alone Dump Console Message Dump Formatting Module. STEP 22 


PARAMETERS 22 Prints a message indicating 
that the message log buffers 
NUMMISS are missing probably because 


of I/O errors during the 
Stand-Alone Dump. 





[23] Prints a blank line. 


PRINT: 08 
BLANK, LENGTH( BLANK ) 


AN 






Converts the number of 
missing messages to a 
printable form. Puts this 
number in the message to be 
printed. 


sie 


\r—/ DECCONV: 14 


EVAL(NODCMCNT ); 
MSGTEXT(MSGPOS2 ), NUMLEN2 





Prints the first and second 
neces line and a blank 
ine. 


PRINT: 08 
MSGTEXT, EVAL(MSGPOS2-1) 
ye 


\r—7 PRINT: 08 
BUFMIS2, LENGTH(BUFMIS2) 
/L—IN 


\rZ7 PRINT: 08 
BLANK, LENGTH( BLANK ) 


26 Returns to the subroutine 
caller. 


ste— 
\r—7 
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Diagram 52. AMDSAXSM Stand-Alone Dump Extended Storage Manager 


AMDSAXSM - MODULE DESCRIPTION 


DESCRIPTIVE NAME: Stand-Alone Dump Extended Storage Management. 
FUNCTION: 

AMDSAXSM executes the PGIN instruction to page data in from 

extended storage, and may indicate where a page can be found 

on auxiliary storage. 

ENTRY POINT: AMDSAXSM. 

PURPOSE: See FUNCTION. 

LINKAGE: Branch, standard linkage. 


CALLERS: None 


INPUT : 
BCTBUFRA - Real address of buffer for PGIN. 
RITEST - Address of the beginning of the EST. 
ESTCHNG - When 0, a valid copy of the page exists on auxiliary 


storage. 
ESTDATA - LSID of the auxiliary storage copy of a page on 
extended storage. 


OUTPUT: 
BUFFER -~ Frame to which PGIN is done (return code 0 only). 
XSDSPC - Successful PGIN count (return code 0 only). 
XSDDER - Data error count (return code 4 or 8). 
XSDBNAC - Block not available count (return code 4 or 8). 
XSDUEC - Unexpected error count (return code 8 only). 


BCTLSID - LSID of page on auxiliary storage 
(return code 4 only). 


EXIT NORMAL: XSMEXIT - to caller, via BR 14. 
EXIT ERROR: XSMEXIT - to caller, via BR 14. 
EXTERNAL REFERENCES: 


ROUTINES: 
AMDSAGTM (SVC) - Get and free automatic data area. 
AMDSABIN (SVC) - Convert to printable hex. 
AMDSACON (SVC) - Write messages to console. 


CONTROL BLOCKS: 
Private to SADMP, in macro AMDSARMK: 
BCT - Buffer Control Table. 
CCT - Common Communication Table. 
RCB - Recovery Control Block (created and deleted). 
MVS control blocks: None are modified. 
ESTE, RIT, CVT, PVT, XPTE 
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AMDSAXSM - MODULE OPERATION 


AMDSAXSM receives an ESTE (Extended Storage Table Entry) 
and a BCT (Buffer Control Table). AMDSAXSM attempts to 
page-in the extended storage frame specified by the ESTE 
into the buffer associated with the BCT. AMDSAXSM 
performs the following steps: 


1. Sets up an RCB (Recovery Control Block) exit. 
2. Checks the validity of the ESTE and the BCT. 


3. If the EST (Extended Storage Table) is present and 
valid, and the ESTE is within the bounds of the 
EST, AMDSAXSM executes a PGIN instruction to read 
the page from the extended storage frame into the 
buffer associated with the BCT. 


G. If the PGIN instruction is successful (condition 
code 1s 0), AMDSAXSM increments the count of 
successful PGIN instructions and sets the module 
return code to 0. 


5. If the PGIN instruction fails with a condition code 
of 1, AMDSAXSM updates the "data error" count and 
issues message AMDO7I1I. 


6. If the PGIN instruction fails with a condition code 
of 3, AMDSAXSM updates the "block not available" 
count and issues message AMDO7I1I. 


7. If a valid copy of the page exists on auxiliary 
storage, and the PGIN instruction fails, AMDSAXSM 
places the LSID (Logical Slot ID) for the auxiliary 
storage slot where the page resides into the BCT 
and sets the module return code to 4. 


8. If a valid copy of the page does not exist on 
auxiliary storage, AMDSAXSM sets the module return 
code to 8. 


9. If the EST is not present, or the ESTE is not 
within the bounds of the EST, AMDSAXSM increments 
the "unexpected error" count, issues message 
AMDO71I, and sets the module return code to 8. 


10. If the EST is present but invalid, AMDSAXSM does not 
increment any error counts, and does not issue any 
messages, because message AMDO71I was already 
issued during Stand-Alone Dump initialization. 


RECOVERY OPERATION: 

If a program check occurs, processing continues at the 
RCB exit (label: ERROR). This error exit code performs 
the following steps: 


1. Sets the module return code to 8 to indicate that the 
PGIN operation was not successful. 

2. Updates the “unexpected error" count. 

3. Issues message AMDO7ILI. 
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AMDSAXSM = DIAGNOSTIC AIDS 


ENTRY POINT NAME: AMDSAXSM. 


MESSAGES: 


AMDO71I ERROR IN EXTENDED STORAGE, E-FRAME=ssssssss, DATA ERROR 
BLOCK NOT AVAILABLE 
ESTE=eeeeeeee, UNEXPECTED ERROR 


ABEND CODES: None 
WAIT STATE CODES: None 


RETURN CODES: 
EXIT NORMAL: 


0 (RCXSMOK) - The page-in from extended storage was 
successful. 

4 (RCXSMAUX) - The page-in from extended storage failed 
but a valid copy of the page exists on 
auxiliary storage. The LSID has been 
put into BCTLSID. 

8 (RCXSMERR) - The page-in from extended storage failed 
and no valid copy of the page exists on 
auxiliary storage. 


EXIT ERROR: 
8 - The page-in from extended storage failed and no valid 
copy of the page exists on auxiliary storage. 


REGISTER CONTENTS ON ENTRY: 


R1 - Points to standard parameter list. 
R14 - Return address. 
R15 - Entry-point address. 


REGISTER CONTENTS ON EXIT: 
EXIT NORMAL: 


Registers 0 - 14 restored. 
Register 15 contains return code. 


EXIT ERROR: 


Registers 0 - 14 restored. 
Register 15 contains return code. 
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AMDSAXSM = Stand-Alone Dump Extended Storage Management. STEP 01 ) 


‘\ AMDSAXSM executes the PGIN instruction to 
>|] page data in from extended storage,» and 


may indicate where a page can be found on 


PARAMETERS 7 
AMDSAXSM| | auxiliary storage. 





lesTeParn BCTPARM 7 eainameas 
/ 
PARAMETERS (pa > fo. Initializes. 
Sets up the recovery \AMDSARMK 
environment. 


/ 
SAVENAME 


Checks the extended storage 
control blocks for validity. 


A. If the EST is valid and the ESTE is 


within the EST, tries a PGIN 
instruction. 


AMDSARMK pseeeious >} sy 
-; \r—/ TRYPGIN: 09 
XSDVALID : 


RIT 


RITFESTE RITLESTE 


AMDSARMK oh ---------- >| B. If the EST is valid and the ESTE is not \AMDSARMK 


\ within the EST, sets the module return / 


error" count and issues message AMDO7I1I. 
AMDSARMK 








sev 


\rn17 MSGO71: 13 


XSDUEC RCXSMERR 





ESTEO71, ESTEPTR» UNEXO71 





AMDSARMK fas >||04| If the EST is not valid, \AMDSARMK 


\ sets the module return code / 

/ to 8 to indicate an error on 
the PGIN instruction. If the 
EST is not present, updates 


the “unexpected error™ count 
and issues message AMDO7I1I. 






AMDSARMK 





XSDUEC RCXSMERR 


sev 


\rn—)7 MSGO71: 13 


ESTEO71, ESTEPTR», UNEX071 





\ 

o5 > 05 Normal and abnormal exit: 
/ Deletes the recovery 

XSMEXIT environment. 


RECOVER 





(DELETE, XSMRCB) 
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AMDSAXSM —- Stand-Alone Dump Extended Storage Management. STEP 06 


Returns to the module 


caller. 


AMDSARMK ERROR Error exit: Sets the module \AMDSARMK 


------ --=---> return code to 8 to indicate / 
\ a PGIN failure. Updates the 
/ "unexpected error™ count and 


AMDSARMK issues message AMDO7I1I. 






XSDUEC 


RCXSMERR vuoi 


\r—7 MSGO71: 13 





ESTEO71, ESTEPTR, UNEX071 


Goes to the normal exit. 


» 
>RSMEXIT: O05 
/ 


ESTE 09. Attempts to page-in an 


[”~C*S@Yd: extended storage frame. 
L 


RIT 





AMDSARMK 


BCTBUFRA 


AMDSARMK pos >|]10| If the PGIN condition code \AMDSARMK 
\ is 0, sets the module return / 
/ code to 0; and updates the 
successful PGIN count. 


[12] If the PGIN condition code 
is not 0, updates the 
appropriate error count, 
issues message AMDO71I, and 
sets the appropriate module 
return code. 






AMDSARMK 





XSDSPC RCXSMOK 


LY28-1189-2 (c) Copyright IBM Corp. 1982, 1985 Service Aids 4-231 


Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


Diagram 52. AMDSAXSM Stand-Alone Dump Extended Storage Manager 


AMDSAXSM = Stand-Alone Dump Extended Storage Management. 


AMDSARMK 
\ 
/ 











AMDSARMK 


AMDSARMK 


XSDCURR 


AMDSARMK 


ESTE pied dieatiau > 


ESTVLSID ESTCHNG 
ESTDATA 


XPTDATA 


< Ps 
~ ~ 
= =| 
m m 


AMDSARMK 


AMDSARMK 
/ 


4-232 MVS/XA Service Aids Logic 


T eee >| A. If the PGIN condition code is 1, updates 


. If a valid copy of the page exists on 


STEP 11A 


\AMDSARMK 


/ 
XSDDER 


the "data error" count and issues 
message AMDO7I1I. 


MSGO71: 13 
EFRMO71, EFRMID, DERRO71 


If the PGIN condition code is 3, updates \AMDSARMK 


the "block not available" count and / 
issues message AMDO7I1I. 


yvsUSIN 


\r—V/ MSGO71: 13 


sy 
\r—/ 






EFRMO71, EFRMID, BNAO71 





\AMDSARMK 
auxiliary storage, puts the LSID of the / 

page into the BCT and sets the module 
return code to 4 to indicate an error 

eccurred on the PGIN instruction, but a 

valid copy of the page exists on 


auxiliary storage. 


\| D. If no valid copy of the page exists on 


auxiliary storage, sets the module 
return code to 8 to indicate that an 
error occurred on the PGIN instruction 
and no valid copy of the page exists on 
auxiliary storage. 


Returns to the subroutine 
caller. 
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AMDSAXSM - Stand-Alone Dump Extended Storage Management. STEP 13 
\ 
PARAMETERS 13 > 
/ 
INSERT] INSERT2 MSGO71 
INSERT3 \ 
/ 
PARAMETERS \ Sets up the inserts for the 
/ message. Converts the 
INSERT1 E-FRAME number or the ESTE 


pointer to EBCDIC. 


SVCBIN, INSERT2, INS2071; 
LENGTH(INSERT2 ) 





PARAMETERS 





/ 





16 Returns to the subroutine 
caller. 
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This section contains the following information about the organization of the 
stand-alone dump program: 


A discussion of the three stages of processing. 
— The specification stage 
— The initialization stage 


— The execution stage 


A series of figures illustrating the various storage layouts during different 
stages of processing. 


A description of module calling sequences. 


Module and macro descriptions. 


Three Stages of Processing 


Specification Stage 


Initialization Stage 


During the specification stage, you set up SADMP the way you want it. You 

specify the type of SADMP program to run, and specify whether additional 

storage is to be dumped. You code the AMDSADMP macro instruction, wi 
specifying keyword values that tailor the dump program to the installation. Then 

you assemble the macro instruction using either of two methods: 


In two-stage generation, you first assemble the AMDSADMP macro 
instruction to produce stage-two JCL. Then, you execute this JCL to 
initialize the SADMP residence volume. 


In one-step generation, after coding the AMDSADMP macro as input control 
statements, you execute the AMDSAOSG program as a single job step. 


The initialization of the SADMP residence volume involves three phases: 


Me 


Assembly of the AMDSADM2 macro produces the SADMP real storage 
dump program AMDSARDM, which dumps real storage, and the SADMP 
common communication table (AMDSACCT), an internal control block. 


The SADMP build module AMDSABLD puts the output from phase one 
onto the residence volume in ready-to-load form. AMDSABLD locates the 
SADMP IPL program (AMDSAIPL) and the SADMP virtual storage dump 
program (AMDSAPGE), and puts them onto the residence volume. 





If the residence volume is on a direct access device, the device utility ICK DSF 
is invoked to put SADMP’s IPL text onto the device’s IPL track (cylinder 0, ) 
track 0). 
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Execution Stage 


4. If the residence volume is on a tape, that tape must be initialized with a tape 
mark and have the file protect ring inserted. 


The execution of SADMP involves three processes: 


1. Channel programs IPL1 and IPL2 load AMDSAIPL into page 0 of real 
storage. Then the IPL process gives control to AMDSAIPL. AMDSAIPL 
loads AMDSACCT into storage, then loads and calls AMDSARDM for the 
real storage dump program and AMDSAPGE for the virtual storage dump 
program. AMDSADIP locates storage that does not contain data needed by 
systems, and loads AMDSAPGE into this storage. 


2. AMDSARDM dumps real storage and processor-related information, and 
writes title and header records. 


3. AMDSAPGE dumps paged-out virtual storage. 
Notes: 


1. Stand-alone dump uses only real, online devices. When dumping to or from 
devices that have both real and virtual storage, specify only real storage 
addresses to SADMP. Stand-alone dump must reside in real, online storage. 


2. You cannot direct SADMP output to its residence volume. 


The SADMP IPL process destroys valuable data because it must include a 
processor reset. Therefore, the first part of SADMP is the processor STORE 
STATUS (See MVS/XA Principles of Operation), done prior to IPL. This copies 
the volatile data into main storage at locations in the PSA which, because of their 
hardware usage, are not likely to be of value to MVS. 


The IPL reads 24 bytes of data (IPL1) into location 0, then executes the channel 
program beginning at location 8. When the program successfully completes, the 
IPL sequence completes by putting the IPL device subsystem ID into X‘30’ and 
loading the PSW at location 0. 


The IPL1 channel program reads in up to X‘90’ bytes of data, loads the IPL2 
channel program into location X‘110’, and issues a transfer in channel instruction 
(TIC) to it. The data that IPL1 and IPL2 overlaid is lost; fortunately, it is of no 
value to SADMP or for debugging. IPL2 saves the remainder of absolute page 0 
by writing it onto the IPL device, and reads module AMDSAIPL into X‘840’ 
bytes of storage beginning at storage location X‘7C0’. 
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Hex address | 
: J 
IPL1 





18 
Ba 
Subchannel data 
Co 
110 
IP 
Up to 1A0 = 
700 
AMDSAITPL 
Program 
1000 


Figure 4-3. SADMP Absolute Storage after IPL. 


When the channel program completes, the PSW that is loaded gives control to 
AMDSAIPL. AMDSAIPL copies additional storage onto the residence device 
that provides additional working storage. AMDSAIPL loads AMDSARDM and 
calls AMDSARDM to dump the processor data and real storage, substituting the 
data saved for use by the virtual dump, which requires the data areas to 
reconstruct the virtual storage. To accomplish this, the data overlaid when 
AMDSARDM was loaded is copied back in. (See Figure 4-4). 


Hex Hex wi) 


0 LOADPT 
Hardware Area AMDSARDM 
200 Program 
CCT 
400 
600 Up to 
AMDSAIPL LOADPT + 3000 
7CO Data Area AMDSARDM 
Dato Area 
AMDSAIPL 
Program 
1000 LOADPT + 4000 











Figure 4-4. SADMP Absolute Storage During AMDSARDM Execution. 


AMDSAIPL then initiates the loading of AMDSAPGE which dumps the 
paged-out virtual storage. During the real storage dump, a PSA is located and 
information is copied into the CCT. The 4k bytes that it occupied contains no 
data required by the virtual dump. It can be used as working storage. 
AMDSAIPL reads the first 4K bytes of AMDSAPGE (CSECT AMDSADIP) 
into this page, and gives it control. 


AMDSADIP locates storage management control blocks and uses them to 
determine real storage that is either backing the link pack area or available 
(backing nothing). AMDSADIP builds the storage use table SUT to describe this 
storage. AMDSADIP also locates a range of contiguous virtual addresses in the 
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200 


600 
7CO 


1000 





LPA, which it remaps (by altering the page table entries) onto the real storage 
found earlier. The data contained in that range of virtual addresses cannot be 
dumped. The content of the LPA is sufficiently constant that the operator 
DUMP command can obtain the contents at a later time. 


Once AMDSADIP obtains the storage, AMDSADIP loads the remaining pages of 
AMDSAPGE using an I/O subroutine in AMDSAIPL. Following AMDSADIP 
in the load module is the relocation table (RLT) put there by AMDSABLD 
during residence volume initialization (see Figure 4-5, Figure 4-6, and 


Figure 4-7). 


AMDSADIP uses the RLT to relocate the address constants, both 


real and virtual, in the rest of AMDSAPGE. After loading is complete, 
AMDSAIPL passes control to CS9ECT AMDSAPGE for initialization. 


Hordwore Areo 


CCT 





SUT 


AMDSAIPL 
Data Area 


AMDSAIPL 
Program 





Location Unpredictable 











PSA +0 — 
AMDSADIP Remainder 
Program of RLT 
? *? 
PSA + FOO 
PSA + 1000 RLT +1000 


Figure 4-5. SADMP Absolute Storage During AMDSADIP Execution. AMDSADIP and the RLT are in Contiguous 


Virtual Storage. 
Hex Address 
0 


1000 
2000 





Figure 4-6. 


AMDSADIP CSECT 
RLT 


AMDSAPGE CSECT DAT-on Modules 


AMDSAPGI CSECT 


DAT-off Modules 





AMDSAPGE Load Module 


On the residence volume, this is divided into 4K. blocks. 
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Hex Address Hex Relative Address 
0 0 
| Hardware Area 1000 | aa 
2000 | Trace Table (RCT) 
CCT 2000 | 
) | 
Dump Options AMDSAPGE Program 
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Figure 4-7. SADMP Virtual Storage During AMDSAPGE Execution 


The SADMP page table may be at n - 1000. The SUT address is at wa” 
CTSUT (virtual). (See “Section 4: Data Areas” in this chapter.) 
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Figure 4-8. Tape Residence Volume Format 
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Figure 4-9. DASD Residence Volume Format 
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It is not possible to write over a particular record on a tape. To avoid loss of 
data, all writing must take place following the last record on the tape that is to be 
preserved. Refer to Figure 4-8 and Figure 4-9 to determine the location, length 
and description of specific records when using tape or DASD residence volumes. 


The virtual storage dump program is a single machine-executable module 
(AMDSAPGE) that consists of a number of object modules. These modules 
provide operating system functions that are necessary to access data from 
different address spaces. For example, AMDSAPGE contains a 
program-interrupt handler, auxiliary- and real-storage managers, getmain and 
freemain routines, an I/O interrupt handler, I/O error-recovery routines, and an 
SVC interrupt handler. 


Linkage between modules in AMDSAPGE is through the use of SVCs; an 
AMDSADMP SVC interrupt handler performs the linkage. Each module is 
assigned an SVC number which other modules use when calling the module. The 
SVC calling scheme provides for dynamic address translation for modules that 
must operate as part of each different address space processed. See Section 2: 
Method of Operation, for more information. 


Module Calling Sequences for AMDSADMP Functions 


The following maps show sequential flow of AMDSADMP modules. Each map 
indicates the active modules for a specific function and describes the operations 
performed by those modules. Entry point names are also provided where they 
differ from the module names. Figure 4-10 explains the design of sequence maps. 


For more detailed descriptions of the functions, see the diagrams in Section 2: 
Method of Operation. 


Single Path Flow Alternate Path Flow 
Calling Module Calling Module 
Module A Module A 
Module A! Module B 
Module A? Module B! 


Module B (ENTRY1) 


The calling module first calls A, The calling module determines whether 
which then calls A! and A?. to call A or B for this operation. If B 
When A returns, the caller passes receives control, it calls B! before 
control to B at entry point returning to the caller. 

ENTRY!1. 


Figure 4-10. Example of Calling Sequence Map 
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AMDSADMP Generation 


AMDSADMP Execution 


One-Step Generation 


AMDSAOSG 


AMDSADMP 


Z AMDSADMz2 


AMDSABLD 


Z AMDSAPRS 


CKDSF 


Two-Stage Generation 


AMDSADMP 
AMDSADM2 
AMDSABLD 


ICKDSF 


AMDSABLD (IPL1 channel! program) 


AMDSABLD (1PL2 channel 
program) 


AMDSAIPL 


AMDSADM2 
(AMDSARDM) 


AMDSADIP 


= AMDSAPGE 


Console Message Formatting 
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Initializes the residence volume in one job step. 


Accepts macro specification of SADMP and invokes 
AMDSADMz2. 


Generates the real dump program AMDSARDM and 
the CCT. 


Initializes the SADMP program in 
SYS1.PAGEDUMP. 


Checks the syntax of the dump options. 


Puts SADMP IPL text onto track 0, cylinder 0 of a 
direct access device. 


Accepts macro specification of SADMP and produces 
stage-two JCL. 


Generates the real dump program AMDSARDM and 
the CCT. 


Initializes the SADMP program in 


-SYS1.PAGEDUMP. 


Puts SADMP IPL text onto track 0, cylinder 0 of a 
direct access device. 


IPL channel program, which reads in IPL2. 


Saves page 0 on JPL volume and reads in 
AMDSAIPL. 


SADMP IPL program. Reads the CCT, 
AMDSARDM and AMDSADIP into real storage and 
gives them control. 


Writes header and processor records and dumps 
real storage. 


Loads the virtual storage dump program into real and 
virtual storage. 


Dumps paged-out virtual storage and console trace 
data. 


AMDSAFCM — Formats the SADMP console message log. 
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Virtual Storage Dump Program 


AMDSAPGE — Initializes the virtual storage dump program and 
controls dumping. 
AMDSAPGE(AMDSADMP) — Dumps console trace data and paged-out virtual 
storage. 
AMDSAMSF — Dumps console trace data. 
AMDSAVCK — Checks the validity of the ASM and address space 
control blocks. 
AMDSAPMT — Asks the operator for additional storage to dump. 
AMDSAAID — Dumps local address spaces. 
AMDSASIO — Rewinds and unloads the output tape. 
AMDSACON — Informs the operator that the dump is done. 
AMDSADCM — Initializes and dumps the console message log. 


Dump of Console Trace Data 


AMDSAMSF — Dumps console trace data. 
AMDSABUF — Obtains a page buffer. 
AMDSASIO — Writes the page buffer to the output tape. 
Dump of Address Spaces 
AMDSAAID — Locates and initializes address spaces, and causes 
dumping of data in them. 
AMDSAVCK — Checks the validity of the ASCB. 
AMDSASIN — Initializes (swaps in) the address space. 
AMDSAMDM — Dunps relevant data. 
AMDSAGTF — Dumps GTF trace data from the GTF address space. 
AMDSACON — Issues address-space-statistics messages. 
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Dump of Address Space Data 








AMDSAMDM — Scans the dump table and dumps the data in the 
address space that the dump table describes. 
-—__ AMDSATXT (AMDSABIN) — Converts binary data to EBCDIC. 
AMDSACON — Writes messages to the console. 
AMDSAGTM — Obtains and frees storage for the VSMLIST work area. 
IGVSLIST — Converts high-level descriptions of storage (subpools, 
LSQA, etc.) into address ranges. 
AMDSARRD — Dumps address ranges. 
AMDSAAUD — Logs errors and recovers from them. 
AMDSAAUD — Logs errors and recovers from them. 
AMDSAVCK — Checks the validity of address space control blocks. 


Note: IGVSLIST (VSMLIST) is a program that resides in the nucleus of the 
dumped system and provides the SADMP interface to virtual storage 
management. 


Dump of GTF Data 


AMDSAGTF — Dumps the GTF history queue. 
AMDSAVCK — Checks the validity of the GTF control blocks. “s 
AMDSATXT (AMDSABIN) — Converts binary fields to EBCDIC. wd 
AMDSACON — Writes messages to the console. 


Prompting for Additional Storage 


AMDSAPMT — Processes dump options specified when SADMP was 
| generated, and prompts the operator to specify 
additional dump options. Adds additional storage to 
the dump table. 





-—— AMDSAGTM — Allocates and frees storage for AMDSAPMT buffers 

and data. 

AMDSACON — Writes messages to the console. 

AMDSAUUD — Logs errors after program checks, GETMAIN failures, 
or other unusual events. 

AMDSAPRS — Checks the dump option syntax and translates dump 

option input text into a dump option set. 

AMDSAGTM — Allocates and frees storage. 


Note: AMDSAPRS must run under both SADMP and MVS/XA. AMDSAPRS 
issues SVC 120 for storage, which under SADMP becomes a call to 
AMDSAGTM. 
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Page/|Segment Fault Handling and Dumping 


AMDSAUPD — 


AMDSAGTM — 
AMDSABUF — 
AMDSARSM — 
AMDSADOS — 
AMDSAASM — 


AMDSASIO — 


AMDSAAUD — 


Console Message Dump 


AMDSADCM — 
AMDSAGTM — 
AMDSAAUD _ 
AMDSABUF — 


AMDSASIO — 


Real Storage Management Interface 


AMDSADIP — 


AMDSASIN — 
AMDSAVCK. 
AMDSABUF 
AMDSADOS — 
AMDSAAUD — 
AMDSASIO — 
AMDSACON - 
AMDSATXT (AMDSABIN) ~ 
AMDSAASM — 
AMDSAXSM — 

AMDSARSM — 
AMDSAGTM _ 


AMDSAXSM — 


Resolves page and segment faults, and dumps all pages 
brought in as a result. 


Obtains and frees the autodata area. 

Allocates a page buffer. 

Locates the faulting page in real or auxiliary storage. 
Copies real pages. 

Converts an LSID into a TTR and device address. 


Reads the page from auxiliary storage and dumps it to 
the output tape. 


Passes control to the recovery environment if the fault 
cannot be resolved. 


Writes console messages to the output tape. 
Obtains and frees the autodata area. 
Recovers from unexpected errors. 

Obtains dump page buffers. 


Writes message-dump buffers to the output tape. 


Determines which page frames the virtual dump can be 
safely loaded into. 


Initializes (swaps in) address spaces. 

Checks the validity of control blocks 

Obtains page buffers. 

Copies real pages. 

Recovers from errors and logs them. 

Dumps page buffers. 

Writes console messages. 

Converts data to EBCDIC. 

Translates LSIDs into a device address and TTR. 
Reads pages from extended storage. 

Locates a faulting page in real or auxiliary storage. 
Obtains and frees autodata area. 


Reads pages from extended storage. 
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Auxiliary Storage Management Interface IOS Interface 





AMDSAASM — Converts a logical slot identifier into a direct access 
device seek/search address and device address. 
AMDSAGTM — Obtains and frees autodata area. 
AMDSAVCK — Checks the validity of ASM control blocks. 
AMDSAUCB — Converts a UCB address into a SADMP IODB. 
AMDSAGTM — Obtains and frees autodata area. 
AMDSAVCK — Checks the validity of the UCB. 
AMDSATXT — Converts binary data to EBCDIC. 
(AMDSABIN) 
AMDSACON — Writes messages to the console. 
AMDSAAUD — Logs errors. 
AMDSAUCB — Locates other exposures of a multiple-exposure device. 


Extended Storage Interface 


AMDSAXSM — Extended storage manager. 
AMDSAGTM — Obtains and frees autodata storage. 
AMDSATXT(AMDSABIN) — Converts binary data to printable EBCDIC. 
AMDSACON — Writes console messages. - 


Control Block Validity Checking 


AMDSAVCK — Checks the validity of control blocks. 
AMDSAGTM — Obtains and frees autodata storage. 
AMDSAAUD — Recovers from errors. 

AMDSATXT — Converts binary data to EBCDIC. 
(AMDSABIN) 
AMDSACON — Writes messages to the console. 


Operator-Controlled Termination and Restart 


Recovery (AM DSAEX]) Handles external interruptions as requests for 


premature termination of SADMP. 


AMDSACON — Writes messages to the console. 
AMDSAAUD — Terminates SADMP. 
AMDSAPGE (AMDSASRR) — Reinitializes and restarts the virtual storage dump 
program. 
AMDSAUUD — Takes a diagnostic dump. 
AMDSASIO — Waits for al] I/O to complete. 
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Page Buffer Allocation 


AMDSABUF 
AMDSAGTM 


AMDSASIO 


I/O Device Error Recovery 


AMDSADER 


AMDSAGTM 

AMDSASIO 

AMDSACON 

AMDSATXT (AMDSABIN) 
AMDSATER (AMDSAERB) 
AMDSATER (AMDSAERM) 
AMDSATER (AMDSAINR) 
AMDSASIO (AMDSATCP) 


AMDSATER 


AMDSAGTM 

AMDSASIO 

AMDSACON 

AMDSATXT (AMDSABIN) 

AMDSATER (AMDSAERB) 
AMDSATER (AMDSAERM) 
AMDSATER (AMDSAINR) 

AMDSATER (AMDSANTP) 
AMDSAAUD 


AMDSASIO (AMDSATCP) 


AMDSATER (AMDSAERB) 


| _aAMDsAGTM 


AMDSATER (AMDSAERM) 


AMDSAGTM 
AMDSATXT (AMDSABIN) 
AMDSACON 


Allocates, reclaims and steals page buffers. 
Obtains and frees autodata storage. 


Waits for tape I/O to complete, and free buffers. 


Recovers from errors on direct access devices. 
Obtains and frees autodata storage. 

Executes DASD channel programs. 

Writes messages to the console. 

Converts binary data to EBCDIC. 

Updates error recovery block. 

Writes I/O error messages. 

Requests intervention on as direct access device. 


Translates real channel program addresses to virtual 
addresses. 


Recovers from tape I/O errors and handles end-of-tape 
processing. 


Obtains and frees autodata storage. 

Executes tape channel programs. 

Writes messages to the console. 

Converts binary data to EBCDIC. 

Updates error recovery block. 

Writes I/O error messages. 

Requests intervention on a tape. 

Unloads old tape and causes a new one to be mounted. 
Terminates SADMP if the tape is unusable. 


Translates real channel program addresses to virtual 
addresses. 


Updates device error recovery blocks. 
Obtains and frees autodata storage. 
Writes I/O error messages. 

Obtains and frees autodata storage. 
Converts binary data to EBCDIC. 


Writes messages to the console. 
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AMDSATER (AMDSAINR) 
— AMDSAGTM 
AMDSACON 
AMDSASIO 
AMDSATER (AMDSANTP) 
AMDSAGTM 


— AMDSASIO 


—  AMDSACON 

AMDSATER (AMDSAINR) 

AMDSAT80 
AMDSAGTM 
AMDSASIO 

|_ AMDSACON 
AMDSATER (AMDSAERB) 
AMDSATER (AMDSAERM) 
AMDSATER (AMDSAINR) 
AMDSATER (AMDSANTP) 
AMDSATXT (AMDSABIN) 
AMDSAAUD 


AMDSASIO (AMDSATCP) 


I/O Services 


AMDSASIO 


AMDSAGTM 

AMDSATXT (AMDSABIN) 
AMDSACON 

AMDSASIO 

AMDSAAUD 


AMDSAIOI 


AMDSASIO (AMDSATCP) 
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Requests intervention on direct access devices. 

Obtains and frees autodata storage. 

Writes messages to the console. 

Waits for intervention. 

Unloads old tape and causes a new one to be mounted. 
Obtains and frees auto data storage. 


Executes tape channel programs to write tape marks, 
rewind, unload, and read labels. 


Writes messages to the console. 

Requests intervention on a tape. 

Recovers from tape I/O errors for 3480 tape drives. 
Obtains and frees auto data storage. 

Executes tape channel programs. 

Writes messages to the console. 

Updates device error recovery block. 

Writes I/O error messages. 

Requests intervention on a tape. 

Unloads old tape and causes a new one to be mounted. 
Converts binary data to EBCDIC. 

Terminates SADMP if the tape is unusable. 


Translates real channel program addresses to virtual 
addresses. 


Performs I/O operations by providing channel 
programs and issuing SSCH. 


Obtains and frees autodata area. 
Converts binary data to EBCDIC. 
Writes messages to the console. 

Waits for I/O to complete. 
Terminates SADMP after fatal errors. 


Handles I/O interruption (called via on J/O 
interruption). 


Translates virtual channel program addresses to real 
addresses. 
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AMDSAIOI 


-—— AMDSAGTM 


+-—— AMDSASIO 





AMDSATER 
AMDSAT80 
AMDSADER 


AMDSACON 
a0 SASIO 
AMDSAAUD 
Basic Services 
AMDSAPGI 
ncn 
AMDSAUPD 


AMDSASIO (AMDSATCP) 


= 
AMDSAAUD 


AMDSASVI 


AMDSAAUD 
AMDSATXT (AMDSABIN) 
AMDSATXT (AMDSAEBC) 
AMDSAGTM 
_ AMDSAAUD 


AMDSAAUD 


>——AMDSAGTM (AMDSAFRM) 





AMDSADCM 


AMDSACON 


AMDSASIO 


Handles I/O interruption, recovers from errors and 
frees used BCT. 


Obtains and frees autodata area. 

Restarts channel programs. 

Recovers from tape errors. 

Recovers from tape errors for 3480 tape drive. 
Recovers from DASD errors. 

Writes messages to the console and reads replies. 
Executes console channel programs. 


Recovers from errors. 


Handles program interruptions. 


Recovers from errors, takes internal dumps, and 
abnormally terminates SADMP. 


Resolves page faults. 

Translates channel program addresses from real 
addresses to virtual addresses and from virtual 
addresses to real addresses. 


Obtains and frees autodata storage. 


Passes control] to the top RCB on the error recovery 
stack if the channel program is too long. 


Handles SVC interruptions and sets up execution 
environments. 


Recovers from errors. 

Converts binary data to EBCDIC. 
Converts EBCDIC data to binary. 
Allocates and frees dynamic storage. 
Recovers from efrors. 


Recovers from errors, logs errors, takes dumps, and 
abnormally terminates SADMP. 


Frees storage owned by abnormally terminating 
processes. 


Dumps console message dump buffers. 
Writes a message to the operator console. 


Rewinds and unloads the tape and dumps SADMP 
storage to the output tape. 
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This list includes all CSECTs, entry points, included segments, and executable 


macros. 


Module/Macro 
AMDSAAID 

AMDSAARD 
AMDSAASM 


AMDSAAUD 


AMDSABIN 


AMDSABLD 


AMDSABUF 
AMDSACCW 
AMDSACON 
AMDSADCM 
AMDSADER 


AMDSADIP 


AMDSADMP 


AMDSADM2 
AMDSADOS 
AMDSAEBC 
AMDSAERB 
AMDSAERM 
AMDSAEXI 
AMDSAFCM 


AMDSAFRM 


AMDSAGTF 


AMDSAGTM 


AMDSAINR 
AMDSAIOI 
AMDSAIPL 


AMDSAMDM 
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Description 

Searches MVS/XA for all defined address spaces. 

Accumulates a list of address ranges dumped for an address space. 
Translates an LSID into a page data set CCHHR. 


Implements an FRR-like recovery mechanism and manages the self-dumping and 
abnormal] termination functions. 


Alternate entry to AMDSATXT, that converts binary to printable EBCDIC. 


Problem program that organizes and prepares the SADMP code for easy loading, 
and creates the IPL channel program. 


Manages the BCT (buffers/page frames) allocation, reclamation, and stealing. 
Contains the tape and DASD channel programs. 

Provides the console communication service and contains the console CC Ws. 
Dumps console messages to the output tape. 

DASD error recovery procedures (ERP). 


Locates storage (real and virtual) for the virtual dump code, then loads and 
relocates it. 


Macro that checks the validity of the generation parameters, and punches either 
the job stream that initializes the residence volume or, the input to AMDSAOSG. 


Macro that generates the various real storage dump routines. 

Performs DAT-off operations. 

Alternate entry to AMDSATXT, that converts printable EBCDIC to binary. 
Alternte entry to AMDSATER, that updates the ERB. 

Alternate entry to AMDSATER, that produces ERP error messages. 
Alternate entry AMDSAPGE, that handles external interruptions. 

Formats the console message log. 


Alternate entry AMDSAGTM that AMDSAAUD uses to recover short short term 
storage allocated by modules that are being terminated. 


Dumps the GTF trace data. 


Manages the dynamic storage by providing support for the R-form GETMAIN 
macro (SVC 10 and 120). 


Alternate entry to AMDSATER, which handles required intervention. 
Handles I/O interruptions. 
Bootstraps all of SADMP into the processor with minimal data loss. 


Manages the dumping of an address space. 
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AMDSAMSG 
AMDSANTP 


AMDSAOSG 


AMDSAPGE 
AMDSAPGI 
AMDSAPMT 
AMDSAPRS 
AMDSARDM 


AMDSARMK 


AMDSARSM 


AMDSASAD 


AMDSASA2 


AMDSASAM 
AMDSASAR 
AMDSASIN 
AMDSASIO 


AMDSASSR 


AMDSASVI 


AMDSATCP 


AMDSATER 
AMDSATXT 
AMDSATS80 
AMDSAUCB 
AMDSAUPD 
AMDSAVCK 
AMDSAXSM 
SGAMA40I 


SGAMASO! 
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Problem program message CSECT. 
Unloads a tape and causes a new one to be mounted. 


A problem program that uses dynamic allocation and invocation to perform the 
residence volume initialization as a single job. 


Completes the virtual dump initialization after AMDSADIP loads the code. 
Program interruption handler. 

Handles interactive prompting for additional storage to be dumped. 

Parses the responses to interactive prompting. 

Module generated by macro AMDSADM2 to dump real storage. 


Included segment that contains the executable macros for internal interfaces, the 
data area mappings, and constants. 


Determines the frame address or LSID of a page for AMDSAUPD. 


Contains a TYPE=SAD expansion of AMDSADM2 that supports AMDSAAUD 
by dumping real storage and communicating with the console. 


Contains the second half of AMDSASAD to allow division into two 
noncontiguous pages. 


Alternate entry into AMDSASAD to write messages to the console. 
Alternate entry into AMDSASAD to unload the output tape. 

Swaps in an address space by establishing the minimum DAT structure. 
Drives all I/O and manages the I/O for all devices. 


Alternate entry into AMDSAPGE that performs a system restart by reinitializing 
the virtual dump. 


Provides an SVC linkage service that allows address space switching, DAT mode 
switching, flow tracing, and recovery check pointing. 


Translates channel program addresses from real addresses to virtual addresses or 
from virtual addresses to real addresses. 


Tape error recovery procedures (ERP). 

Message CSECT for AMDSACON. 

Tape error recovery procedures (ERP) for 3480 tape drives. 
Converts UCB address into a SADMP IODB. 

Manages the page/segment fault handling. 

Checks the validity of control blocks and data areas. 

Reads pages from extended storage. 

SYSGEN macro for link-edited SADMP code. 


SYSGEN macro for copied SADMP code. 
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Macro Interfaces 
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Module/Macro 
?7ERROR 
?FREEMAIN 
?GETMAIN 
210 

ILVA 
?RCBREGS 
?7RECOVER 


ISVCI 


7TRACE 
?TRANSCHP 
?7UPDERB 


IVCHK 
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Description 

Indicates an unusual or error condition and the action to be taken. 
Dynamic storage deallocation. 

Dynamic storage allocation. 

I/O services: DASD, tape, console, and UCB to JODB conversion. 
Converts a real address to a virtual address within SADMP. 
Makes sure that registers are not used across an RCB exit. 
Initializes, enqueues, and dequeues an RCB. 


Creates an internal PLS procedure that facilitates use of a PLS call with a 
parameter list for service routines that have no specific macro interface. 


Places entries into the trace table. 
Translates channel program addresses. 
Keeps track of I/O retries. 


Checks the validity of control blocks. 
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Section 4: Data Areas 


Buffer Control Table (BCT) 
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Size: 72 bytes. 
Created by: AMDSAPGE. 


Updated by: AMDSABUF, AMDSADER, AMDSAIOI, AMDSRSM, 
AMDSASIN, AMDSASIO, AMDSATER, AMDSADCM, AMDSAUPD. 


Pointed to by: CTBCTAVQ (available queue head), BCTAVQP (available queue 
chain), CTBCTALL (all BCT queue head), BCTQUEUE (all BCT queue head), 
IODBIOQP (output I/O queue head), BCTIOQP (output I/O queue chain). All 
pointers are real addresses. 


Use: Represents a SADMP page buffer. 


BCTs are initialized on the available queue. Whenever a page of data needs to be 
brought in from real or virtual storage or needs to be dumped, a BCT is allocated 
for a paging operation. After the operation completes, the BCT is placed on the 
I/O queue to be written to the dump output device. When output I/O completes, 
the BCT is returned to the available queue unless it contains information (such as 
a page table) important for further execution. 


If no BCT is available to satisfy a request, a BCT is stolen according to an LRU 
algorithm. BCT associated with a terminated address space are automatically 
reclaimed. 


BCT 

Offsets Type Length Name Description 

0 (0) STRUCTURE 64 BCT Buffer control table entry. 

0 (0) CHARACTER 4 BCTBCT EBCDIC acronym. 

4 (4) CHARACTER 16 BCTINIT This field must be cleared when a BCT is 
made available. 

4 (4) ADDRESS 4 BCTPGTEP Address of page table entry that points to 
the page in the buffer. For non-master 
address spaces, the page table is ina 
SADMP storage buffer and this address is 
common virtual. For the master address 
space the page table may also be in private 
storage. In either case, the PGTE is 
accessible from master. 

8 = (8) ADDRESS 4 BCTSGTEP Common virtual or master virtual address of 
the segment table entry that points to the 
page table in the buffer. 

12 (C) BITSTRING ] BCTUSE Buffer usage. If zero, BCT is available. 

1... _ BCTINUSE This buffer contains a page which is in use 
for DAT. 

Al. ven BCTPGING This BCT is involved in a swapping/paging 
operation. 

l _ BCTIO The I/O service is processing this BCT. 

wal a BCTPGT The buffer contains a page table. 


Reserved. 
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Offsets Type 
13 (D) BITSTRING 
X... 
l.. 
wl. 
14 (E) BITSTRING 
16 (10) UNSIGNED 
20 (14) CHARACTER 
20 (14) ADDRESS 
24 (18) ADDRESS 
24 (18) ADDRESS 
28 (1C) ADDRESS 
28 (IC) UNSIGNED 
28 (IC) UNSIGNED 
29 (ID) UNSIGNED 
30 (1E) UNSIGNED 
32, (20) ADDRESS 
36 (24) CHARACTER 
36 (24) ADDRESS 
37. (25) ADDRESS 
38 §=©(26) UNSIGNED 
40 (28) ADDRESS 
40 (28) CHARACTER 
42 (2A) CHARACTER 
44. (2C) ADDRESS 
48 (30) CHARACTER 
48 (30) ADDRESS 
52 (34) SIGNED 
54 (36) CHARACTER 
OCP 
Size: 24 bytes. 


Created by; AMDSASIO. 


Updated by: AMDSASIO. 


Pointed to by: CPB. 


Length 


ao hn—— ha bh hh bh Oo 


PN — 


bho 


16 


10 


Name 
BCTSTAT 


BCTPICOD 
BCTUSID 


BCTQUEUE 
BCTIOQP 
BCTAVQP 
BCTFRAME 
BCTLSID 


BCTINDEX 
BCTRBA 
BCTBUFRA 
BCTRCHD 
BCTKEY | 
BCTKEY2 
BCTASID 
BCTVADDR 
BCTCPU 
BCTBUFVA 
BCTPTRD 


BCTPTBCT 


BCTPTGS 
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Description 

Buffer status flags. 

Reserved. 

BCTRECLM Virtual address reclaimed 
from real storage. 

BCTSWPDS Page from swap data set. 
Address-fault program interrupt code. 
Unreferenced steal interval count down. 
Initialize to X‘FFFFFFFF’ if reference bit 
for buffer is on when AMDSABUF steals a 
buffer; otherwise, it is decreased by one 
Queue pointers(virtual addresses). 

Chain field for all BCTs. 

Next BCT on I/O queue. 

Next BCT on available queue. 

Real address of frame to be reclaimed. 
Logical slot identifier; page’s auxilary 
storage id. 

Unused. 

PART/SART entry number. 

Relative block address. 

Real address of buffer. 

Header portion of output record containing 
the page in the buffer. 

Storage key of first 2K. 

Storage key of last 2K. 

ASID of data in buffer. 

Virtual address of data in buffer (original 
ASID). 

Reserved. 

CPU address of the console loop trace from 
which the trace was taken. 

Virtual address of buffer in SADMP virtual 
storage. 

Page table reclaim data. This field must be 
cleared when a BCT is made available. 
Common virtual address of the BCT for the 
page table that maps the page in this BCT’s 
buffer. If 0, the page table is not in a BCT 
buffer. This pointer is used to update 
BCTPTPGS in the page table’s BCT. 

The number of pages mapped by the page 
table in this buffer. If 0, none are mapped, 
or this page does not contain a page table, 
and this BCT may be safely reclaimed. If 
not 0, this BCT may not be reclaimed. 
Reserved. 


Use: OCP is a channel program you can use to write a dump record header and BCT page buffer to 
the output tape. 


Offsets 

0 (0) 
0 (0) 
0 (0) 


Type 
STRUCTURE 


CHARACTER 
CHARACTER 


Length 
24 


8 
I 
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Name 
OCP 


OCPCCW!I 
OCPICMD 


Description 
Writes dump record header and BCT page 
buffer to an output tape. 


CCW to write page header. 
Write. 


LY28-1189-2 © Copyright IBM Corp. 1982 1985 





Contains Restricted Materials of IBM 
Licensed Materials — Property of IBM 


Offsets 


2 (2) 
4 (4) 
8 (8) 
8 (8) 
9 (9) 
10 (A) 
12, (©) 
16 (10) 


16 (10) 
17, (11) 
18 (12) 
20. (14) 


Type 


CHARACTER 
1111 
ll... 


ADDRESS 
ADDRESS 
CHARACTER 


CHARACTER 
CHARACTER 
ADDRESS 
ADDRESS 
CHARACTER 


CHARACTER 
CHARACTER 
ADDRESS 
ADDRESS 


Length 


Oo f& hy 


— oo & hI — 


pf 


Common Communication/Control Table (CCT) 


Name 
OCPIFLGS 


OCPIPCI 


OCPILEN 
OCPIADDR 
OCPCCW2 


OCP2CMD 
OCP2FLGS 
OCP2LEN 
OCP2ADDR 
OCPCCW3 


OCP3CMD 
OCP3FLGS 
OCP3LEN 
OCP3ADDR 


Description 
CD, SLI. 


Bit is on to cause an [/O interrupt after the 
previous interrupt ends. 

Length of BCTRCHD. 

Address of BCTRCHD. 

CCW writes page in buffer. 


Not used. 

CC, SLI. 

Length of buffer (4K). 
Address of buffer. 


TIC to channel program, next BCT or a 
NOP. 


NOP or TIC. 

Must be 0 for TIC. 

Must be 0 for TIC. 

Unused or address of next OCP. 


Size: 1024 byte record on the residence volume, 64 bytes during AMDSARDM 
execution, 140 bytes during virtual storage dump program execution. 


Created by: AMDSADM2 macro. AMDSAIPL, AMDSARDM, and 
AMDSAPGE complete the functional initialization. 


Updated by: All SADMP programs that run at execution time. 


Located at: Absolute 512 = X‘200’ 


Use: Central control block for SADMP. The CCT provides communication 
among the IPL program, the real storage dump program, and the virtual storage 
dump program. The CCT also provides either pointers to most SADMP shared 


data areas, or the data areas themselves. 


Offset 

0 (0) 
0 (0) 

8 (8) 
12 (C) 
16 (10) 
20 (14) 
24 (18) 
28 (1C) 
29 (1D) 
30 (1E) 
32 (20) 
36 (24) 
40 (28) 
44 (2C) 


Size 
80 


—e hh hh hf 


fab hb NO 
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Field Name 
CTINITED 


CTLOADPT 
CTLOADEN 
CTIPLSID 
CTCCHHS 
CTCCHHE 


CTINRPT 


CTINTPC 
CTOUTSID 
CTCONSID 
CTLINES 


CTCONTYP 
CTCT3277 
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Description 

This section of the CCT is initialized in the form of 
the CSECT AMDSACCT, which is generated at 
residence volume initialization time. 

EBCDIC ID. 

AMDSARDM load point (page boundary). 
First byte after the storage used by AMDSARDM. 
IPL device’s subchannel ID. 

Beginning of SYS].PAGEDUMP. 

Ending CCHH of SYSI.LPAGEDUMP. 

Unused. 

Number of record tracks for IPL device which 
contains SYS1.PAGEDUMP. 

Number of tracks/cylinders for IPL device. 
Output device subchannel ID. 

Console subchannel ID. 

Number of lines current on the console screen. 
This is used to contro] screen erasure and to 
communicate between AMDSARDM and 
AMDSACON. 

Console type. 

3277/3278 type. 


4-253 


Offset 
45 


47 


48 


52 


56 
60 


68 


76 
80 


80 
84 
88 


96 
100 
100 


101 


102 
103 


104 
106 
108 
112 
116 
120 


(2D) 


(2E) 


(2F) 


(30) 


(34) 


(38) 
(3C) 
(40) 
(44) 
(48) 
(4C) 
(50) 


(50) 
(54) 
(58) 
(SC) 
(60) 
(64) 
(64) 


(65) 


(66) 
(67) 
(68) 
(68) 
(6A) 
(6C) 
(70) 
(74) 
(78) 


Size 


Ah bh BES 


rom) 


— oe hhh S 


* 
— 


Field Name 


CTGENDTO 


CTPREFIX 


CTCVTP 
CTSTDM 
CTPCCAV 
CTSUT 
CTRCB 
CTXSD 
CTUNINIT 


CTIODB 
CTSVCSTV 
CTTRACE 
CTBCTAVQ 
CTBCTALL 
CTAUDPL 
CTAUDACT 
CTAUDRCR 
CTAUDIOX 
CTAUDPCE 
CTAUDFLG 


CTAUDDMP 
CTAUDTRM 
CTAUDRCV 
CTAUDRC 
CTAUDSVC 


CTASIDA 
CTASIDD 
CTASCBM 
CTASCBA 
CTASCBD 
CTSTDD 
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Description 

CTOPTION These flags represent generation 
options. 

CTIPLTYP OFF=DASD, ON=TAPE IPL device 
type. 

CTDMPFMT Output format ON=PRINTED, 
OFF = MACHINE readable. 

CTVIRTD For printed dumps only, the default 
addresses to be used in taking the dump if the 
operator cannot communicate with AMDSARDM. 
OFF= REAL, ON= VIRTUAL. 

CTMSG OFF=ALL, ON=ACTION only 
messages are to be written to the console. 
CTPROMPT OFF=D0O NOT, ON=DO0 prompt 
for dump tailoring options. 

CTFLGRS Flags reset on retry 

CTSCREND OFF=PROMPT before erase; 

ON = ERASE then continue. 

CTNODUMP Page buffers must not be written to 
the output tape. 

CTCONACT Messages should not be issued during 
error recovery. 

CTFLGNR Flags not reset on retry. 

Reserved. 

CTNOCONS No functioning console exists. 
Address of the dump tailoring option input from 
the DUMP = keyword at generation time. 
Processor prefix value obtained from store status 
by AMDSARDM. This is the real address where 
AMDSADIP is loaded, and the SUT resides. 
CVT virtual address. 

Segment table designation of master address space. 
PCCA virtual address. 
Virtual address of the storage use table. 

RCB queue head (virtual). 

Extended storage descriptor address. 
This portion of the CCT is used only by the virtual 
dump modules, and is not initialized in 
AMDSACCT. It is set to zeros by AMDSAPGE 
during its initialization. 
Head of the queue of all IODB (virtual). 

SVC status stack pointer (virtual). 
Trace table address (real). 

Queue of available BCT. 

Queue of all BCT. 

Parameter list for AMDSAUUD (?7ERROR). 
Error recovery activity flags. 
No recursion permitted through AMDSAUUD. 
Error recovery I/O cannot be called. 
A program check is expected. 

Flags. 

Unused. 

Dump requested. 
Termination requested. 

Recovery requested. 

Reason code. 

SVC number. 

Not used. 

Active ASID. 

ASID being dumped. 

Master address space ASCB address. 
Active address space ASCB address. 
ASCB address for address space being dumped. 
STD for address space being dumped. STD for 
address space being dumped. Used by 
AMDSASVI for routine that run in address space 
being dumped. 
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Dump Table 


Size: 26 bytes minimum, 4096 bytes maximum. 


Created by: AMDSAPGE. 


Updated by: AMDSAPMT. 


Pointed to by: CTDT (virtual). 


Use: Describes the paged-out storage that the virtual dump program must dump 
in addition to common storage, GTF data and console trace data. 


Offset 

0 (0) 
0 (0) 
4 (4) 


6 (6) 
8 (8) 
0 (0) 


0 (0) 


bo 


(2) 


(2) 
(2) 
(2) 
(4) 
(2) 
(2) 
(2) 
(2) 
(2) 
(3) 
(2) 
(2) 
(2) 
(6) 
(2) 
(2) 
(2) 
(3) 


Wh NHN AH NN ww hh hw hh ff FN hb 


Size 


ho NM & OO 


© 


a) 


=e QGorhkh_ na CO Ce OOO ONN CS 


Field Name 


DTHEADER 
DTHID 
DTHALLOC 


DTHLEN 
DTENTRY 
DTLIST 


DTCOUNT 


DTARRAY 


DTAS 
DTASINT 
DTASLO 
DTASHI 
DTIN 
DTJOBNAM 
DTKEY 
DTKEYINT 
DTKEYLO 
DTKEYHI 
DTADDR 
DTADDRIN 
DTADDRLO 
DTADDRHI 
DTSP 
DTSPINT 
DTSPLO 
DTSPHI 


Dynamic Storage Control Element (DSCE) 


Description 


The dump table header. 

EBCDIC acronym ‘DTAB’. 

Length of the storage allocated for this table 
(including header). 

Length of table (including header) in bytes. 
Table entries. 

Generic name for any/all of the parts of a dump 
table entry (DTENTRY). 

The number of members in the array for the list 
being mapped. 

The array of list members. Each PART entry is defined 
in this field. 

Address space identifier (ASID) list. 

ASID interval array. 

Smallest ASID in interval. 

Largest ASID in interval. 

Job name list. 

Job name array. 

Storage key list. 

Key interval array. 

Smallest key in interval. 

Largest key in interval. 

Address range list. 

Address interval array. 

Smallest address interval. 

Largest address in interval. 

Subpool list. 

Subpool interval array. 

Smallest subpool in interval. 

Largest subpool in interval. 


Size: 16 bytes each: 256 DSCEs make up a 4096 byte DSCE area. 


Created by: AMDSAPGE. 


Updated by: AMDSAGTM, AMDSAFRM. 


Pointed to by: SUTDSCEU (in-use queue head), SUTDSCEA (available queue 
head), DSCESHRT (available queue and short-term storage queue chain), 
DSCELONG (long-term storage queue chain). 
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Use: Describes a block of storage that is either for dynamic allocation, or already 
allocated. An available for describing a new block of storage. An in-use DSCE 
describes unallocated storage, or describes storage that is allocated for short-term 
or long term use. An in-use DSCE for short-term storage is automatically freed if 
the process that requested the DSCE terminates abnormally. An in-use DSCE 
that is allocated for long term storage is never deallocated unless deallocation is 
explicitly requested. In-use DSCEs are circularly double-threaded by the long and 
short chain fields. 


Offset Size Field Name Description 

0 (0) 4 DSCESHRT Queue chain used to satisfy short term requests. 

0 (0) 4 DSCEAQ The SUTDSCEA queue. 

4 (4) 4 DSCELONG Queue chain used to satisfy long term requests. 

8 (8) 4 DSCEADDR Real address of the beginning of the area described. 
12 (C) 2 DSCELEN Length of the area. 

14 (E) I DSCESPN Subpool number. 128 or higher is for long-term 


Input/Output Device Block (IODB) 


Size: 92 bytes. 


request. 1S (F) 1 DSCESSI SVC stack index that 
was current when this storage was allocated. Zero 
if storage is unallocated. 


Created by:. AMDSAUCB (paging device IODBs), AMDSAPGE (all others). 


Updated by: All virtual dump modules that use I/O. 


Pointed to by: CTIODB (IODB queue head), IODBNEXT (IODB queue chain). 


Use: Represents an I/O device, the current status of the device, and any I/O 
operation taking place on the device. 


IODB 

Offsets Type Length Name Description 

0 (0) STRUCTURE — 88 JODB Input/Output Device Block. 

0  (©0) CHARACTER = 32 IODBQCA Queuing control area. QCARIGHT places 
al] the I[ODB onto a singly threaded queue. 
QCADOWN points to a CPB queue of 
channel programs to be executed. 

0 (0) CHARACTER 4 IODBIODB IODB acronym. 

32. (20) CHARACTER 16 IODBDSCH Description of I/O device and subchannel. 

32, (20) CHARACTER 8 IODBCDID Device type and model numbers for the 
control unit and device, in packed decimal, 
as received from the sense [D command 
(e.g.FF38801 133500100 from a 3350 model | 
with a 3800 model 11 control unit. 

32 (20) CHARACTER 1 Reserved. Must be X‘FF’. 

33. (21) CHARACTER © 3 IODBCUID Control unit ID. 

33. (21) CHARACTER 2 IODBCUT Contro! unit type number. 

35. (23) CHARACTER |! IODBCUM Control unit model number. 

36 (24) CHARACTER 3 IODBDID Device ID. 

36 (24) CHARACTER 2 IODBDT Device type number. 

38 (26) CHARACTER 1 IODBDM Device model number. 

39 (27) CHARACTER 1 Reserved. 

40 (28) UNSIGNED 2 IODBDEV Device number. 

42 (2A) UNSIGNED 2 IODBSCH Subchannel ID. 


4-256 MVS/Extended Architecture Service Aids Logic 


LY28-1189-2 © Copyright IBM Corp. 1982 1985 





Contains Restricted Materials of IBM 
Licensed Materials — Property of IBM 


Offsets 
44 (2C) 


45 (2D) 
46 (2E) 


47 (2F) 


48 (30) 


48 (30) 


49 (31) 


50 (32) 
51 (33) 
52 (34) 
56 (38) 
60 (3C) 
61 (3D) 
64 (40) 


64 (40) 
66 (42) 
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Type Length 
BITSTRING ] 


BITSTRING | 
BITSTRING | 


BITSTRING | 
1... 
A. 
wl. 
wl 


CHARACTER 16 


BITSTRING 4 


1... 


L111 
L111 L111 
XXXX - XXXX 
ADDRESS 4 


ADDRESS 4 


CHARACTER 1 
BITSTRING 3 


CHARACTER 20 


UNSIGNED 2 
BITSTRING 2 
I... 
A. 


: 
— 
. 


Name 
IODBCLAS 
IODBUTYP 
IODBISCM 
IODBUSE 
IODBOUT 
IODBPAGE 
IODBCONS 
IODBIPL 


J[ODBOPER 


IODBOPTY 
IODBCLOS 

IODBREAD 
IODBWRIT 
IODBSNSC 

JODBCHP 


IODBWAIT 


IODBRCVR 
IODBINRQ 


IODBCHPR 


IODBFINT 


IODBCHPA 


IODBREQ 


IODBWRC 
IODBSTAT 
IODBWCNT 
IODBSFLG 
IODBUNAV 
IODBINTX 
IODBERR 


IODBENE 


Chapter 4. Stand-Alone Dump (AMDSADMP) 


Description 

Device class copied from an MVS UCB or 
equal to the value defined for UCBs. 

Unit type copied from an MVS UCB or 
equal to the value defined for UCBs. 
Interrupt subclass mask for control register 
6. 

Use to which the device is put. 

Dump output volume. 

Page dataset. 

Operator console. 

SADMP IPL device (dump residence 
volume). 

Describes the I/O operation. The standard 
parameter list for AMDSASIO is the IODB 
followed by 4 parameters that are copied in 
order into the 4 unreserved subfields of 
IODBOPER. 

Operation type flags. 

Reserved. 

Close a device. 

Read from a device. 

Write to a device. 

Sense. 

Reserved. 

The caller has provided a channel program 
address (IODBCHPA). 

IODBWAIT = 1, IODBFINT =0, start any 
specific I/O operation, then if an interrupt is 
expected wait until no more interrupts are 
expected. IODBWAIT = 1, IODBFINT= | 
same, but return after the first interrupt. 
Attempt to recover from I/O errors by 
calling the device ERP module. 
Intervention request. Wait for an interrupt 
even if the device is not active. 

The channel program virtually addressed by 
IODBCCWA has real, not virtua] address 
fields (used when the I/O service is restarting 
a channel program). 

Return after the first interrupt. 


Reserved. 

Address of a channel program provided by 
the I/O service user. 

Address of SADMP control block that 
represents the buffer for the requested I/O 
operation. 

Reserved. 

If nonzero, this value is to be used as the 
wait code while waiting for this I/O. 

Status of the device and subchannel and 
their current I/O operation. . 
Number of processes waiting for I/O. 
Status flags. 

Device unusable. 

Interrupt is expected I/O is currently active. 
Reserved. 

The last I/O interrupt presented an J/O error 
that has not yet been corrected. 

Error in sense command. 
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Offsets 


67 


68 


72 


76 
80 
81 
81 
81 
82 
83 
84 


DDX 


(43) 


(44) 


(48) 


(4C) 
(50) 
(51) 
(51) 
(51) 
(52) 
(53) 
(54) 


Offsets 


0 


0 
4 


(0) 


(0) 
(4) 


Type 
1... 


XXX 
ADDRESS 


ADDRESS 


ADDRESS 
UNSIGNED 
CHARACTER 
CHARACTER 
CHARACTER 
UNSIGNED 
UNSIGNED 
ADDRESS 


Type 
STRUCTURE 


CHARACTER 
ADDRESS 


Length 


4 
4 


Name 
IODBDERP 


IODBSCHB 


IODBCCWA 


IODBSENS 
IODBSENL 
IODBERB 
ERB 
ERBINSID 
ERBRCNT 
ERBMAX 
IODBDDX 


Name 
DDX 


DDXID 
DDXDDX 
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Description 

Device error recovery procedures are in 
progress. 

Reserved. 

Address of SCHIB. Its SCSW is updated 
with the most recent SCSW from a TSCH. 
CCW address suitable for restarting the 
current channel program. This is either the 
last CCW started by SSCH or the last 
nonzero CCW address from an SCSW. 
Address of sense data. 

Length of sense data. 

Error Recovery Block. 


Message ID. 

Retry count. 

Maximum number of retries left. 
Address of device dependent extension. 


Description 

Device dependent IODB extension, common 
fields. 

ID field. 

Pointer to a secondary DDX. 


DDXD — direct access extension. Some field names begin with IOB so they will agree with 
pre-JBB2125 usage. 


0 
0 


8 
12 


12 
12 
13 
15 
15 


19 


20 
21 


22 


(0) 
(0) 


(8) 
(C) 


(C) 
(C) 


(F) 
(F) 
(11) 
(13) 
(14) 
(15) 


(16) 


STRUCTURE 
CHARACTER 


ADDRESS 
CHARACTER 


CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
BITSTRING 
BITSTRING 
1... 


.X., 
CHARACTER 


—eoeee NN BB N= OO 
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DDXD 


IODBUCB 
IODBRID 


IODBCCHH 
IODBM 
IODBSEEK 
IODBSRCH 
IODBCC 
IODBHH 
IODBR 
IODBFL6 
IODBDFLG 
IODBPGST 


IODBNG 


Direct access extension. 

ID field ‘DDXD’ and secondary extension 
pointer (DDXI). 

Virtual address of the UCB for this device. 
For a page-in operation, this describes where 
in the page dataset to find the record that 
contains the page. Includes the seek and 
search arguments. 

Seek address. 

*‘M’ value. 

Beginning of seek address. 

Search address. 

Cylinder number. 

Track number. 

Record number. 

Copied from UCBFLS&. 

DASD flags. 

This device is a cached auxiliary storage 
subsystem (see DDXI). 

Reserved. 

The UCB for this device is bad. 

Reserved. 
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DDXI - secondary extension for cached auxiliary storage subsystem (CASS) (e.g., 3880/11 + 3350). 
These devices are DASDs with a cache and microcode optimized for paging. They use different CCWs 
and access UCBs differently from ordinary DASD. 


DDXC - console extension. 


0 
0 
8 


(0) 
(0) 
(8) 


STRUCTURE 
CHARACTER 
BITSTRING 
X... 

AL. 


DDXT - tape extension. 


0 
0 


(0) 
(0) 


QCA 


Offsets 


oo & 


= 


20 
24 
25 
26 


(0) 
(0) 
(0) 


(4) 
(6) 
(8) 
(8) 


(C) 


(10) 


(14) 
(18) 
(19) 
(1A) 


Offsets 


(0) 
(0) 
(4) 


(8) 
(8) 
(8) 
(C) 
(C) 
(10) 
(10) 
(14) 


STRUCTURE 
CHARACTER 


Type 


STRUCTURE 
CHARACTER 
CHARACTER 


CHARACTER 
UNSIGNED 
CHARACTER 


ADDRESS 


ADDRESS 
ADDRESS 


ADDRESS 
BITSTRING 
BITSTRING 
CHARACTER 


Type 
STRUCTURE 
CHARACTER 
BITSTRING 
1... 

A. 


CHARACTER 
UNSIGNED 
ADDRESS 
UNSIGNED 
ADDRESS 
UNSIGNED 
UNSIGNED 
CHARACTER 
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DDXC 
DDXCFLAG 


DDXCFWAT 


DDXT 


Name 


QCA 
QCAELEMT 
QCAETYP!1 


QCAELEN 
QCASTRUC 


QCALEFT 


QCARIGHT 


QCAUP 


QCADOWN 
QCASTYP1 
QCASTYP2 


Name 


DCA 
DCAID 
DCAFUNC 
DCAFCOPY 
DCAFSRCA 


DCAFLEN 
DCAPARMS 
DCAPARM 1 
DCAPRCVR 
DCAPARM2 
DCAPSRCE 
DCAPARM3 
DCAPLEN 


Console extension. 

ID is ‘DDXC’. 

Flags. 

Reserved. 

Wait at the end of the next full screen and 
ask for permission to wait at the following 
screen. 


Tape extension. 
ID is ‘DDXT’. 


Description 

Queuing control area. 

Description of the element this QCA is in. 
EDCDIC ID to identify the type of the 
element. 

Reserved. 

Element length, including the QCA. 
Description of the structure this QCA is 
implementing. 

Left pointer for trees and doubly threaded 
queues. 

Right pointer for trees and doubly threaded 
queues, also pointer for singly threaded 
structures and stacks. 

Pointer to owning or higher level entity. 
This may be a unit of processing the control 
block is waiting for. 

Pointer to owned or lower level entity. 
Type of data structure. 

Subtype of data structure. 

Reserved. 


Description 

DAT change communication area at X‘600’. 
EBCDIC ID ‘DCA’. 

Function control bits. 

1 = copy. 

1 = source is described by address in 2nd 
parm. 

1 = 3rd parm is length of data. 
Parameters. 

Ist parameter. 

Receiver of operation. 

2nd parameter. 

Source of operation. 

3rd parameter. 

Length of data. 

Reserved. 
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TMD 
Offsets Type Length Name Description 
0 (©) STRUCTURE 17 TMD Tape Message Display. 
0 (0) CHARACTER 1 TMDFCNTL _ Format control byte.sq.. 
111. TMDFOVLY New message overlay 000 = General 001 = 
Dismount 010 = Mount 111 = 
Dismount/Mount. 
al TMDFALT Alternating message 0 = Display 1 msg only 
1 = Alternate messages. 
| ae TMDFBLNK _ Blinking message 0 = Do not blink msg 1 
= Blink message. 
nee TMDFDSPL Display message 0 = Display Ist msg only 
= Display 2nd msg only ignored if 
TMDFALT = 1. 
XX Reserved. 
1 (d) CHARACTER 8 TMDMSG1 Ist Display Message. 
1 (1) CHARACTER 1 TMDMIACT Operator Action. 
2 (2) CHARACTER 6 TMDMIVSR _ Tape Volume Serial Number. 
2 (2) CHARACTER 5 TMDMIVNM_ Constant ‘SADMP’ text. 
7 (7) CHARACTER 1 TMDMIVN8 __ Variable Number (1 to 9). 
8 (8) CHARACTER 1 TMDMIAMD Action Modifier. 
9 (9) CHARACTER 8 TMDMSG2 2nd Display Message. 
9 69) CHARACTER 1 TMDM2ACT Operator Action. 
10 (A) CHARACTER 6 TMDM2VSR _ Tape Volume Serial Number. 
10 (A) CHARACTER 5 TMDM2VNM_ Constant ‘SADMP’ text. 
1S (F) CHARACTER 1 TMDM2VN8 _ Variable Number (1 to 9). 
16 (10) CHARACTER 1 TMDM2AMD Action Modifier. 


Message Parameter (MSGPARM) 
Size: 12 bytes. 
Created by: AMDSADM2, AMDSATXT. 

Updated by: AMDSACON, AMDSAPMT. 


Use: Describes a write/read sequence to the console I/O service. MSGPARM is 
located in arrays in AMDSARDM (real dump) and AMDSATXT (virtual dump). 


Offset Size Field Name Description 
0 (0) l MPWRITLEN _sLength of text to be written. 
l (1) 1 MPRDLEN Length of reply to be read. 
2 (2) 2 MPRC Name used to access the 12 bit reason code 
following MPFLAGS. It must be ANDed with 
X‘OFFF’. 
1111 MPFLAGS 
MPFCONT When on, indicates that MPLNCNT contains the 
maximum number of lines which may follow. 
| oe? This implies that there is no reply possible after this 
line. 
) Ou MPFSPRES This message might be suppressed. 
ae) ed MPFVLR When off, the entire read buffer is folded to 
uppercase (X‘00’ to blank). When on, only the 
character read in is folded. 
Zia sane MPFNCON Message should go only to the console message 
dump. 
Gs XXXX Not used. 
XXXX XXXX Reason code used when waiting for the reply. This 


value is obtained by ANDing MPRC with 
X‘OFFFF’. 
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Offset Size Field Name Description 

4 (4) 4 MPTEXTA Real address of text to be written. 

8 (8) 4 PRPYA Real address of reply area. 

8 (8) 4 MPLNCNT Maximum number of lines that may 


follow this one. Only valid if MPFCONT is on. 


Page 0 Register Save and PSW Build Areas (PGOQMAP) 
Size: 344 bytes. 
Created by: AMDSAPGE. 
Updated by: AMDSAAUD, AMDSAIOI, AMDSAPGI, AMDSASVI. 


Located at: Absolute 3752 (X‘EA8’). The end of PGQMAP is always at the end 
of page 0. 


Use: Register save areas and PSW build areas for interrupt handlers and other 
programs that cannot rely on base registers to locate data areas. PGOMAP also 
contains common SVC instructions. 


Offset Size Field Name Description 

0 (0) 8 PGOPGO EBCDIC identifier. 

8 (8) 64 PGOACRSA AMDSAAUD contro] register save area. 

8 (8) 4 

]2 (C) 4 PGOASTD Control register 1 (segment table designation). 

72 (48) 8 PGOAPSW AMDSAAUD PSW to give control to RCB exit. 

80 (50) 64 PGOSVISA Register save area. 

80 (50) 4 Register 0. 

84 (54) 4 PGOSR1 Register 1. 

88 (58) Aa Registers 2-12. 

132 (84) 4 PGOSR13 Register 13. 

136 (88) 4 PGOSRI14 Register 14. 

140 (8C) 4 PGOSR15 Register 15. 

144 (90) 64 PGOPGISA Register save area. 

208 (D0) 64 PGOIOISA Register save area. 

272 = (110) 64 PGOAUDSA Register save area. 

336 = (180) 8 Reserved. 

336 = (150) 2 PGOSVCSR The restart new PSW points here. This allows 
AMDSASAVI to prepare the environment. 

338 = (152) 2 PGOSVCEX The external new PSW points here. This allows 
AMDASASVI to prepare the environment. 

340 = (154) 2 PGOSVCRT AMDSASVI alters the general purpose register 
14 value to point to this as return linkage. 

342 = (186) 2 Reserved. 
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Real Storage Management Address Space Data (RAD) - 
Size: 32 bytes. 
Created by: AMDSASIN. 
Updated by: AMDSASIN. 
Pointed to by: CTRAD (virtual). 
Function: Contains information specific to an address space that SADMP needs 


to resolve translation exceptions. RAD includes a mapping of the virtual storage 
that the page tables occupy. 


Offset Size Field Name Description 

0 (0) 4 RADID Acronym, 

4 (4) 4 RADPBEGA Beginning of above private PGT’s. 

8 (8) 4 RADPENDA End of (beyond) above private PGT’s. 

12 (C) 4 RADPBEGB Beginning of below private PGT’s. 

16 (10) 4 RADPENDB End of below private PGT’s. 

20 (14) 4 RADPBEGC Beginning of COMMON PGT’s. 

24 (18) 4 RADPENDC End of COMMON PGT’s. 

28 (iC) 2 RADFHS] Index of the first segment that contains a private 


page table. SADMP assumes that the page tables 
that map this and all segments with larger index 
are precisely the high page tables (those that 
map other private page tables). 

30 (iE) 2 RADRECNO Translation exception recursion number. 
SADMP permits only finite number of recursive 


page/segment faults. j 


Recovery Control Block (RCB) 
Size: 32 bytes. 
Created by: Modules that use the SADMP recovery service and execute DAT-on. 
Updated by: AMDSAAUD, and modules that use the SADMP recovery service. 
Pointed to by: CT RCB (queue head), RCBNEXT (chain). 
Use: Saves an environment (error exit, registers, etc.) that a program needs to 


regain control when an unusual condition causes the program to terminate its 
normal sequence of execution. 


Offset Size Field Name Description 
0 (0) 4 RCBNEXT Next higher RCB (virtual). 
4 (4) 4 RCBSSI SSINDEX value which can be used to purge calls, 


because this RCB was queued from the SVC stack. 
Points beyond the top of the stack when RCB is 


created. 
8 (8) 4 RCBSTD Control register 1 for exit. 
12 (C) 4 RCBSAVE Address of recovery routine register save area. 
16 (10) 4 RCBEXIT Address of recovery routine. 20 (14) 4 RCBDATA 


Base address of the dynamic data area for the 
recovery routine. 24 (18) 4 RCBBASE Base 
address of recovery routine. 
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Offset Size Field Name Description 

28 (1C) 4 

28 (1C) 1 RCBSM System mask. 

29 (1D) 3 RCBECODE Error code from AMDSAAUD indicating why this 


recovery routine was given control. 


Relocation Table (RLT) 
Size: 4352 bytes (1086 entries) maximum. Each entry is 4 bytes. 
Created by: AMDSABLD. 


Located at: 3840 bytes (X‘F00’) into the AMDSAPGE load module on the 
residence volume before IPL. 


Use: Describes the relocatable address constants in the AMDSAPGE load 


module. 
Offset Size Field Name Description 
0 (0) 8 RLTHEADR Table header. 
0 (0) 4 RLTRLT *“RLT’ acronym. 
4 (4) 2 RLTNPGS Number of pages in AMDSAPGE load module. 
6 (6) 2 RLTLEN Number of records in RLTDATA. 
8 (8) 4344 RLTDATA 
Relocation Table Proper 
8 (8) 1 RLTGLAGS 
) re Reserved. 
Slee. add RLTDATON Indicates whether constant pointed to by RLTA 
is to be interpreted with DAT-ON. 
XX  -XXXX Reserved. 
9 (9) 3 RLTA Displacement of address constant to be relocated 


into AMDSAPGE load module. 


Sense Data Mapping for I/O Devices 
Size: 24 bytes. 
Created by: AMDSAPGE, AMDSAUCB. 
Updated by: Channel hardware. 


Use: Describes the data furnished by a SENSE command. Sense data mapping 
for I/O devices is located in the device IODB. Symbols used to describe the I/O 
devices are: 


D = DASD only 

S = 3480 tape only 

T = 3420 tape only 

I = Buffered DASD only 
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SENSE 
Offset 
0 (0) 
0 (0) 
b. “Gl 
2 (2) 
3 (3) 
3 (3) 
4 (4) 
S (5) 
6 (6) 
7 (7) 
7 (7) 
8 (8) 
1S (F) 
18 (12) 


Type 
STRUCTURE 
BITSTRING 


stl 
BITSTRING 
LE 


XX, 
CHARACTER 
BITSTRING 
CHARACTER 
1111 
UNSIGNED 
111. 
UNSIGNED 
BITSTRING 
BITSTRING 
1111 a 
ane 1111 
CHARACTER 
CHARACTER 
CHARACTER 


Length 
32 
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Name 


SENSE 
SENSEO0 
SENCR 
SENIR 
SENBO 
SENEC 
SENDC 
SENDA 
SENTCC 
SENUCT 
SENSC 
SENCC 
SENAE 
SENSEO! 
SENPE 
SENLBFF 
SENITF 
SEN DOCU 
SENEOC 
SENTB 


SENMTO 
SENOSR 
SENNRF 
SENLP 
SENBOT 
SENFPD 
SENWSTAT 
SEN FPT 
SENWI 
SENOI 
SENNC 
SENSEO2 
SENSCI 
SENBLF 
SENCO 
SENACS 
SENEDP 
SENCACU 
SENMDFCU 


SENBIDPI 
SENSEO3 
SENERPAC 


SENSEO4 
SENBIDHI 
SENSEOS 


SENPEID 
SENSEO6 
SENSE07 
SENSFMT 
SENFMT 
SENMSG 


SENS1517 
SENS 1819 
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Description 


Sense Input Area Mapping. 
Sense Byte 0. 

Command Reject. 

Intervention Required. 

Bus Out Check. 

Equipment Check. 

Data Check. 

Deferred Access. 

Track Condition Check (D). 
Unit Check Timing (S). 

SEEK Check (D). 

Data Converter Check (T). 
Assigned Elsewhere (S). 

First SENSE byte. 

Permanent error (D). 

Locate block function failed (S). 
Invalid track format (D). 

Drive online to control unit (S). 
End of cylinder (D). 

TU status B bit (7). 


Message to operator. 
Out-of-sequence record (S). 

No record found (D). 

Load point (T). 

Beginning of tape (S). 

File protected DASD (D). 
Write status (S). 

File protected tape (TS). 

Write inhibited DASD (D). 
Operation incomplete (D). 

Tape unit not capable (TS). 
Sense byte 2. 

Selecting channel interface (S). 
Buffered log full (D). 
Correctable (D). 

Alternate controller selected (1). 
Environmental data present (D). 
Channel-adapter control unit (S). 
Microprocessor data flow control 
Unit (S). 

Reserved. 

Block positioning indicator (S). 
Restart Command code (D). 
Error recovery procedure action 
Code (S). 

Sense byte 4. 

Reserved. 

High order bits; logical block position 
of block identifier (S). 

Restart cylinder (D). 

Unused. 

PE ID burst check (T). 

Restart track (D). 

Format and message. 

Sense data format (S). 

Format identifier (1). 

Message identifier (I). 

Reserved. 

Restart displacement (D). 

Data error offset (D). 
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Offset 


20 
20 


31 
31 


Storage Use Table (SUT) 


(14) 
(14) 
(18) 
(IF) 
(IF) 


Type 
CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
UNSIGNED 


Name 


SENS2023 
SENS2022 
SENS2430 
SENS31 
SENDBCNT 


Description 


Correcting data bits 4 bytes ECC (D). 
Correcting data Bits 3 byte ECC (D). 
Unused by SADMP (S). 

Sense byte 31 (S). 

Data byte count (S). 


Size: 540 bytes (129 entries). Each entry is 4 bytes long. 


Created by: AMDSADIP. 


Updated by: AMDSADIP, AMDSAPGE. 


Pointed to by: CTSUT (virtual). CTSUTLOC contains copy of the SUT that 
AMDSADIP uses. CTSUTLOC does not contain all usage information, but 
contains a description of the real storage that SADMP uses. 


Use: Describes the real and virtual addresses and internal usage of the storage 
that SADMP occupies. SUT also contains the headers of the DSCE queues and 
a real pointer to the page frame table. 


Offset 

0 (0) 
4 (4) 
8 (8) 
10 (A) 
12 (© 
16 (10) 
20 = (14) 
24 = (18) 
24 (18) 
27 (1b) 


Size 
4 
4 


2 


2 


4 
4 
4 


516 

4 

11 «1111 
1111 1111 
1111 
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Field Name 


SUTSUT 
SUTVIRTB 


SUTNFRMS 


SUTFUNIN 


SUTMPFTV 
SUTDSCEU 
SUTDSCEA 


SUTPFT 
SUTFRAMA 


SUTFRNUM 


SUTUSE 
SUTSELF 
SUTTRACE 
SUTCODE 
SUTPGT 
SUTDSCEP 
SUTSVCST 
SUTBUF 
SUTSWAP 
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Description 


‘SUT’ acronym. 

Beginning of the virtual address range used by 
AMDSADMP. Maps to SUTFRAMA (0). 
Index of the last page frame in SUTFRAMA. 
Note the last two entries in SUTFRAMA will be 
for contiguous frames. 

Index of the first frame not assigned a permanent 
use during initialization. 

Virtual address of the system’s page frame table. 
Head of the queue of DSCE in use (virtual address). 
Head of the queue of DSCE available (virtual 
address). 

List of frames used by S/A dump. 

An entry. 


The portion of the real address which is the frame 
number. 


Flags for frame usage. 

Frame contains SUT. 

Trace table. 

S/A dump executable code. S/A dump page table. 


S/A dump page of DSCE. 
SVC status element stack. 
S/A dump page buffer. 
SWAP-IN DAT table. 
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SVC Stack 


Size: 4096 bytes. 


Created by: AMDSAPGE. 


Updated by: AMDSAAUD, AMDSASVI. 


Pointed to by: CTISVCSTV 
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Use: Represents the current status of SVC calls. An SVC status element is placed 
onto the stack when an SVC call is made and is removed from the stack when 


the called module returns. 


SVC Status Element 


Size: 96 bytes. 


Created by: AMDSASVI. 


Updated by: AMDSASVI. 


Referred to by: The address of the SVC stack (CTSVCSTR real, CTSVCSTV 
virtual) and the index SSINDEX of the current top entry. 


Function: Describes the status of a process that was suspended when it made an 


SVC call. 
Offset 

0 (0) 
0 (0) 
0 (4) 
g (8) 
0 (0) 
0 (0) 

0 (0) 
4 (4) 
8 (8) 
12. (C) 
13, (D) 
14 (E) 
16 (10) 
20 ~=—(14) 
24 = (18) 
24 = (18) 
28 (1C) 
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Field Name 


SSHEAD 
SVCSVC 
SSINDEX 
SSARRAY 
SVCSTAT 
SSPSW 


SSPDAT 
SSPIA 
SSTDCRI1 
SSNUM 


SSASID 
SSASCB 
SSORIG14 


SSSA 


SSAR13 


Description 


Unique header portion. 

Acronym. 

Index of the entry currently in use. 
The stack. 

SVC status element. 

SVC old PSW value. 


DAT Mode. 

Address of instruction following SVC. 
Segment table designation (CR1). 
Called SVC number. 


CTASIDA value. 

CTASCBA value. 

Register 14 original value because the address 
of a return SVC is substituted. 

Save area passed to called module address in 
register 13. 


Register 13 original back savearea pointer 
received from caller. 
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Swap Address Table (SAT) 


Size: 36 bytes. 


Created by; AMDSAPGE. 


Pointed to by: CTSAT (virtual). 


Use: Describes the real addresses and master address space virtual addresses of 
the DAT tables used to initialize an address space. 


Offset 
0 

4 

8 

12 

16 

20 


24 


28 


32 


Trace Table 


(0) 
(4) 
(8) 
(©) 
(10) 
(14) 


(18) 


(1C) 


(20) 


Size 


ee eo 


AN 


Field Name 
SATID 
SATMSV 
SATSPV 
SATMSV 
SATLSR 
SATLPTV 


SATLPTR 


SATLPOV 


SATLPOR 


Description 

Acronym. 

Virtual address of the master segment table. 
Virtual address of SADMP’s own page table. 
Virtual address in master of the local memory’s 
segment table. 

Real address of the 8K contiguous real storage 
used for local segment tables. 

Virtual address in master of the local memory’s top 
page table. 

Real address of the frame used for the local 
memory’s top page table, if it wasn’t in real storage 
already. 

Virtual address in master of the local memory’s 
segment 0 page table. 

Real address of the frame used for the local 
memory’s 0 page table, it it wasn’t in real storage. 


Size: 4096 bytes. Each entry is 8 bytes long. 


Created by; AMDSAPGE. 


Updated byy AMDSAAUD, AMDSAGTM, ADMSAIOI, AMDSAPGI, 


AMDSASVI. 


Pointed to by; CIT TRACE (real). 


Use: Records the 511 most recent significant events that occur during execution 
of the virtual storage dump program (SVC calls and returns, program and I/O 
interrupts, interrupt handler exits, errors, and others). 


Offset 


12 
12 


(0) 
(4) 
(8) 


(8) 
(B) 


(C) 
(C) 


Size 
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Field Name 


TRCTRC 
TRCINDEX 
TRCTABLE 


TRCID 


TRCMADDR 
TRCINTAD 


Description 

EBCDIC Identifier. 

Index of the last entry used. 

Trace table entry. This is basically a PSW having 
additional information. 

Front of PSW. 

Identifier of the module getting control. TRCID 
is usually an SVC number. For interrupt 
handlers a pseudo SVC number is assigned. 
Mode and address. 

Address of the interrupt. 
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Section 5: Diagnostic Aids 


Wait Reason Codes 


Error Codes 


This section contains: 


@ A description of AMDSADMP wait reason codes. 
@ A description of AMDSADMfF error codes. 

@ A description of the trace table. 

@ A description of the SVC linkage stack. 


Note: Refer to System Messages for message numbers, message text, and 
detecting, issuing, and containing modules. 


Wait reason codes identify unusual or error conditions which might occur in 
SADMP and provide specific diagnostic information when SADMP is not 
running. Each wait reason code is issued at only one location in the SADMP 
code even though the same condition might be detected at more than one 
location. A wait reason code is not intended to identify a condition, but identifies 
how the condition was detected. 


A wait reason code is 3 bytes long: 


@ The first byte is a wait code that indicates the condition. 
@ The last two bytes are the reason code. 


For a description of SADMP wait reason codes, refer to Service Aids. 


The low-speed real dump program may be used to diagnose problems in the 
high-speed real or virtual dump program. Error codes appear in error trace 
records and terminating wait PSWs. They show abnormal! conditions in SADMP 
ranging in severity from common and not serious to terminating. The nghtmost 
three bytes of the PSW or trace entry are X°4Fssee’. (ss) is the SVC number or 
trace event ID (pseudo-SVC) of the issuing program, and (ee) is the unique error 
identifier. 


The virtual dump portion of the high-speed dump program takes diagnostic 
dumps to the output tape following a failure in the virtual dump program. A 
message is issued to the console informing the operator of the failure and the 
module in which the failure may have occurred. An ASID associated with the 
failure is also provided. To aid in determining the cause of the dump, a field in 
the CCT (CTAUDIT) is provided which may identify the problem. The values 
and meanings in CTAUDIT are: 


Error 

Code Explanation Modale 
X*0301’ Retry is done for a console I/O error. AMDSACON 
X‘0302’ The console is lost due to an I/O error. AMDSACON 
X‘0801’ The segment table is invalid. AMDSASIN 
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Error 
Code 

X ‘0802’ 
X‘0803’ 
X‘0804’ 
X‘0805’ 
X ‘0806’ 
X‘0807’ 
X‘0901’ 
X ‘0904’ 
X‘0905’ 
X ‘0906’ 
X‘0907’ 
X ‘0910’ 
X‘0911’ 
X‘O0A01’ 
X‘0A02’ 
X‘0A03’ 
X‘0A04’ 
X‘0D01’ 
X‘0D02’ 
X‘0D03’ 
X‘0D04 
X‘0D05’ 
X‘1001’ 
X‘1002’ 
X‘1001’ 
X‘1102’ 
X‘1103’ 
X‘1104’ 
X‘11058’ 
X‘1106’ 
X‘1107’ 
X‘1108’ 
X‘1109’ 
X‘110A’ 
X‘110B’ 
X‘110C’ 


X‘110D’ 
X°1120 
X*1121 
X*1122’ 
X*1123’ 
X‘1124 
X*1201’ 
X‘13F 1 
X°1604’ 
X°1603’ 
X‘160C’ 
X°160’ 

X‘1701’ 
X*1B01’ 


X*1B02’ 
X‘1 B03’ 
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Explanation 


The top page table is invalid. 

The page table for segment is invalid. 

No BCT is available. 

AMDSAASGM failed. 

The SFT is invalid. 

A DAT table was not read in. 

No BCT is available for paging. 

RSM control block errors. 

AMDSAASM failed. 

SADMP is unable to read the page from the data set. 
No BCT is available for output. 

SADMP is unable to resolve the segment fault. 
SADMP is unable to resolve the page fault. 
GETMAIN requested more than 4096 bytes. 

No more DCSEs are available. 

No storage is available. 

FREEMAIN was for unallocated storage. 

Recursion through AMDSAAUD. 

More than 2 self-dumps requested. 

Terminating error in or recursive entry to the I/O service. 
Master segment table designation in CCT is invalid. 
SADMP is unable to recover because RCB queue is empty. 
An unexpected error occurred. 

GETMAIN for ARBs failed. 

An unexpected error occurred. 

GETMAIN FOR VSM work area failed. 

ASXB is invalid. 


An unexpected error occurred while scanning the dump table. 


VSMLIST program check processing LSQA. 
VSMLIST program check processing CSA. 
VSMLIST program check processing SQA. 
VSMLIST program check processing private. 
VSMLIST program check processing subpool list. 
An error occurred during backward TCB search. 
An error occurred during forward TCB search. 


End of TCB queue was not reached before the count was 
exhausted. 


AMDSAARD failed. 

Nonzero return code from VSMLIST on LSQA request. 
Nonzero return code from VSMLIST on CSA request. 
Nonzero return code from VSMLIST on SQA request. 
Nonzero return code from VSMLIST on private request. 


Nonzero return code from VSMLIST on subpool list request. 


Recursion limit through AMDSARSM exceeded. 
A permanent I/O error exists on the output tape. 
The UCB is invalid. 

An invalid subchannel ID exists in UCB. 

The subchannel is not operational. 

The subchannel is invalid. 

The input is invalid. 


An unresolved page fault exists in AMDSAPMT or 
AMDSAPRS. 


Dump table overflow. 
No console. 
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Module 


AMDSASIN 
AMDSASIN 
AMDSASIN 
AMDSASIN 
AMDSASIN 
AMDSASIN 
AMDSAUPD 
AMDSAUPD 
AMDSAUPD 
AMDSAUPD 
AMDSAUPD 
AMDSAUPD 
AMDSAUPD 
AMDSAGTM 
AMDSAGTM 
AMDSAGTM 
AMDSAGTM 
AMDSAAUD 
AMDSAAUD 
AMDSAAUD 
AMDSAAUD 
AMDSAAUD 
AMDSAARD 
AMDSAARD 
AMDSAMDM 
AMDSAMDM 
AMDSAMDM 
AMDSAMDM 
AMDSAMDM 
AMDSAMDM 
AMDSAMDM 
AMDSAMDM 
AMDSAMDM 
AMDSAMDM 
AMDSAMDM 
AMDSAMDM 


AMDSAMDM 
AMDSAMDM 
AMDSAMDM 
AMDSAMDM 
AMDSAMDM 
AMDSAMDM 
AMDSARSM 
AMDSATER 
AMDSAUCB 
AMDSAUCB 
AMDSAUCB 
AMDSAUCB 
AMDSAVCK 
AMDSAPMT 


AMDSAPMT 
AMDSAPMT 
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Error 
Code 
X‘1C13’ 
X*1D12’ 
X‘1E01’ 
X‘1E02’ 


X°1E03’ 
X‘1E04’ 
X‘1E0S’ 


X*1 E06’ 


X‘1E07’ 
X‘1E08’ 
X‘1E09’ 
X‘1EOA’ 
X‘1EOB’ 
X‘1LEOC’ 
X‘1EOD’ 


X‘1EOE’ 


X*1EOF’ 
X‘1E10 
X‘1E11’ 
x 1E)3° 
X‘1EI4 
X‘2101 


X‘22F 1’ 


Xx°7801’ 
X*7802’ 
X*7803’ 
X*7804 
X‘F901’ 
X‘FDFI’ 


X‘FEcc’ 
X‘FEFF’ 
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Explanation 


System restart. 

An external] interrupt terminated dumping. 

An error occurred during I/O initialization. 

An error occurred during dynamic storage management. 
initialization. 

An error occurred during BCT initialization. 

An error occurred during SVC service initialization. 
An error occurred during external interrupt handler 
initialization. 

An error occurred during swapping service 
initialization. 

An error occurred during trace table initialization. 
ASMVT is invalid. 

ASVT is invalid. 

PART is invalid. 

SART is invalid. 

An error occurred during system restart initialization. 
An error occurred during machine check handler 
initialization. 

An error occurred calling through SVC service 

to AMDSADMP entry point. 

An error occurred in a dumping routine. 

An error occurred during dump table initialization. 
An error occurred when calling AMDSAPMT. 

An efror occurred during system restart. 

Assign failed for a 3480 tape drive. 


A channel program for address translation is longer 
than 1024 bytes. 


A terminating I/O error occurred on the output 

tape. 

GETMAIN requested more than 4096 bytes. 

No DSCE is available. 

No storage is available. 

FREEMAIN was for unallocated storage. 

The SVC stack ts full. A loop probably exists in SADMP 


A termination error occurred on the output tape (no paths 
available). 


Program check. The last byte of the interrupt code is cc. 
Recursion through the program interrupt handler. 


Modale 


AMDSASRR 
AMDSAEXI 

AMDSAPGE 
AMDSAPGE 


AMDSAPGE 
AMDSAPGE 
AMDSAPGE 


AMDSAPGE 


AMDSAPGE 
AMDSAPGE 
AMDSAPGE 
AMDSAPGE 
AMDSAPGE 
AMDSAPGE 
AMDSAPGE 


AMDSAPGE 


AMDSAPGE 
AMDSAPGE 
AMDSAPGE 
AMDSAPGE 
AMDSAPGE 
AMDSATCP 


AMDSAT80 


AMDSAGTM 
AMDSAGTM 
AMDSAGTM 
AMDSAGTM 
AMDSASVI 
AMDSAIOI 


AMDSAPGI 
AMDSAPGI 
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Trace Table 


Locating the Trace Table 


Entry Formats 
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CCT Trace Table 


TRCTRC 
TRCINDEX 


S11 


X‘258’ CTTRACE Trace 









+0 


X*200’ +4 


Entries 


Figure 4-11. Trace Table 


The trace table can be located from the CCT by its real address (CTTRACE). 
The first fullword contains “TRCT” The second fullword (TRCINDEX) contains 
the index number of the last entry put into the table. This index wraps around 
from 0 through 510. The remaining portion of the page is an array of 
doubleword entries. 


@ Call Event Record 


First 3 Bytes of PSW Address Following SVC 


3 4 


I 


oO 


Figure 4-12. Call Event Record 


A call event record is the SVC old PSW with the fourth byte replaced by an 
event ID. The ID is the SVC number of the entry point being called. In the 
cases where the event is not an SVC, a pseudo-SVC number is assigned, and 
an appropriate old PSW is used. Note that the DAT mode (first byte sixth 
bit) must be considered when interpreting the address. 


Return Event Record 


First 3 Bytes of PSW Co Address Returned to 


3 4 


& 
oO 


Figure 4-13. Return Event Record 


One return event occurs for each call event in the reverse order that the calls 
occurred. An exception to this is when AMDSAAUD gives control to an 
error exit. All calls to routines that do not establish their own RCB are 
eliminated as if the routine, whose RCB is current, had never called them. 
Note that the DAT mode (first byte sixth bit) must be considered when 
interpreting the address. 
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@ Enrror ID Record 


mw |e Wait Code or Event Address 


3 4 





am) 
oo 


Figure 4-14. Error ID Record. 


An error ID record has the same format as an event record except that the 
first 3 bytes are zeros. The event ID (fourth byte) is X‘0D’ indicating that 
AMDSAAUD 1s the source of the entry. The last 3 bytes identify the error 
and re the wait-reason code that would be used if SADMP were to terminate. 


@ Address Fault Record 


Pgm Int Code co fre Translation Exception Address 


2 3 4 8 


S 


Figure 4-15. Address Fault Record 


An address fault record follows a call event to AMDSAPGI when the program 
interruption was a translation exception. The ID is X'FE’. The type 1s indicated 
by the PI code in the first two bytes, and the last 4 bytes reference the address 
that caused the exception. 
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ID 


60 
03 
06 
07 
08 
09 
0A 
0c 
0D 


0E 
OF 
10 
11 
12 
13 
15 
16 
17 
18 
19 
LA 
1B 
IC 
1D 
lE 
LF 
20 
21 
22 
23 
24 
2D 
2E 
78 
F9 
FA 
FB 


FC 


FD 
FE 


FF 


Translation Address 
Entry Point Called or Event Mode Enablement 


AMDSASIO 
AMDSACON 
AMDSAASM 
AMDSAERM 
AMDSASIN 
AMDSAUPD 
AMDSAGTM 
AMDSAAID 
AMDSAAUD or error id 
record 
AMDSABUF 
AMDSADER 
AMDSAARD 
AMDSAMDM 
AMDSARSM 
AMDSATER 
AMDSAGTF 
AMDSAUCB 
AMDSAVCK 
AMDSABIN 
AMDSAEBC 
AMDSAINR 
AMDSAPMT 
AMDSASRR 
AMDSAEX] 
AMDSAPGE 
AMDSAERB 
AMDSAPRS 
AMDSATCP 
AMDSATS80 
AMDSANTP 
AMDSAXSM 
AMDSADOS 
AMDSADCM 
AMDSAGET 
AMDSASVI 
AMDSAFRM 

Exit from an interrupt 
handler 

Return through SVC 
linkage 

AMDSAIOI 
AMDSAPGI or Address 
fault record 

Machine check — — 


D 
D 


luo Blut | 


fot eee I 


| << “dS 


[| ZAZ™KMCAKMYAYA™NMCYAAASYAZZZCSK4KZZKA“™AZZK~ AZAZK<ZZA<<< 


| dcdcdc | 
MelclvlohoRMclviol Bm lolol nm 


OU 
zZ< 


a < 
WA 
PoP ARS aI SS ale ME ale ay ADS ST Die sesame ee A a aT URE pee eee ae l\zllzizge 


Figure 4-16. Trace Event IDs and Entry Point Attributes 


The attributes are as follows: 


<<eRZLeOMY! LW 
| 
s 


Meaning 


Depends on the caller, or is not applicable 

Disabled for I/O, external, and machine check interruptions 
Enabled for I/O, external, and machine check interruptions 
Local address space being dumped 

Master address space being dumped 

No reentrancy 

Real address translation mode 

Virtual address translation mode 

Reentrancy 
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How to Read the Trace Data 


The events are entered in chronological order. The second word of the table entry 
is the index of the last entry mode. To get the displacement of the newest entry 
into the page, multiply the index by 8 (the length of an entry) and add 8 (length 
of the table header). The fourth byte of each entry is the event ID. 


The majonty of the event IDs refer to synchronous calls through the SVC linkage 
interface. These together with ID X‘FC’, which indicates a return from the most 
recent call, provide an excellent flow of control trace. Several of the other events 
represent interruptions that are treated as asynchronous calls. If the wait bit is on 
(second byte seventh bit) the address will be a wait reason code giving additional 
information about SADMP. 


SVC Linkage Stack 


Locating the SVC Stack 


The SVC stack can be located from the CCT using its real address (CTSVCSTR) 
or virtual address (CTSVCSTV). The first fullword contains “SVCS”. The 
second fullword (SSINDEX) contains the index number of the element currently 
at the top of the stack. The remaining portion of the page is an array that 
implements the logical stack.. Element 1 is logically the bottom of the stack and 
element SSINDEX is the top of the stack. 


CCT 
CTSVCSTR 
> | CTSVCSTV 


Figure 4-17. SVC Linkage Stack 


SVC Stack 


+0 | SYCSVC 
+4 | SSINDEX 


X*200° 


X‘24C’ 


SVC 
Stack 
Entries 





Use of the SVC Stack 


The SVC stack can be located from the CCT either by its real address 
(CTSVCSTR) or its virtual address (CTSVCSTV). An entry 1s placed in the stack 
each time a call is processed by the SVC linkage handler and one is removed each 
time a return is handled. An entry is added to the stack by increasing SSINDEX. 
When a recovery event occurs and AMDSAAUD passes control to a recovery 
routine, SSINDEX is set back down to the value it was when the RCB was 
enqueued. This ends any chance of activity in any routine called by the routine 
whose RCB exit will be given control. AMDSAFRM is called to free any short 
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term storage obtained while one of the popped elements was at the top of the 
stock. 


One function of the SVC linkage is to provide a save area for the caller’s PSW, 
STD, and registers. These can be valuable in debugging interface problems. 


Storage Assignment (Static and Dynamic) Control Blocks 
DSCEs are of the following types: 


In use header — The header DSCE serves as the queue header for those DSCEs 
that represent storage, but it represents no storage itself. It is marked as 
representing 0 bytes of storage at location 0. Its real address is at SUT+X‘10’. 


In use for long-term allocated storage — These DSCEs represent storage that is 
not normally freed (for example, storage for IODBs and the dump table). They 
are identified as being on the in-use queue, having a nonzero SVC stack index and 
a subpool number greater than 127. They can usually be found close to the 
header DSCE along the long-term queue. 


In use for short-term allocated storage — These represent storage that is freed 
when the program that obtained it finishes (for example, automatic data areas for 
reentrant modules). They are identified by being on the in-use queue, having 
nonzero SVC stack index, and a subpool number less than 128. They can usually 
be found close to the header DSCE along the short-term queue. 


In use for unallocated storage — These represent storage that is currently 
unallocated. They are identified by being on the in-use queue and having an SVC 
stack index of 0. They are typically intermixed with the other in-use DCSEs. 


Available DCSEs — These do not represent storage, but may be used in the future 
to describe new storage blocks. They are identified by being in the set of 
available DSCEs, that is implemented as a singly threaded queue headed by 

SUT + X‘14’ (real address). 
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Chapter 5. Spzap (AMASPZAP) 


Section 1: Introduction 


The AMASPZAP service aid program enables a user to: 


@ Inspect and modify data in any load module that is a member of a partitioned 
data set. 


@ Inspect and modify data in a specific data record which is contained in a 
direct access data set. 


@ Dump records from data sets residing on direct access storage devices. 


AMASPZAP runs under the operating system. It normally resides in 
SYS1.LINKLIB; however, it may reside in a password protected private library. 


For a description of how to use the AMASPZAP service aid, refer to Service 
Aids. 
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Section 2: Method of Operation 





The diagrams in this section show the functions performed by the AMASZAP 
service aid. SPZAP Figure 5-1 shows the hierarchy of the diagrams and defines 
the symbols used. 


Diagram 1 is an overview of AMASPZAP processing. There are four control 
statements that determine the path of processing which AMASPZAP will take: 


@ NAME (Diagram 2) — This statement indicates to AMASPZAP that it will 
be working with a CSECT contained in a load module which is a member of 
a partitioned data set. As a part of this processing path, AMASPZAP may 
replace data in the CSECT, verify the data to be replaced, and/or update SSI 
and IDR records. 


@ CCHHR (Diagram 3) — This statement indicates to AMASPZAP that it will 
be working with a physical record contained in a direct access data set. Asa 
part of this processing path, AMASPZAP may replace data in the record and 
verify the data to be replaced. 


@ DUMP(T) or ABSDUMP(T) (Diagram 4) — These statements indicate to 
AMASPZAP that it is to dump a specific control section or all CSECTs ina 
load module (DUMP), that it is to dump an entire data set, a member of a 


partitioned data set, or a groupd of records residing in a direct access data set 
(ABSDUMP). 


Reading Method of Operation Diagrams 


Method of operation diagrams are arranged in an input-processing-output layout: 
the left side of the diagram contains the data that serves as input to the processing 
steps in the center of the diagram, and the nght side contains the data that ts 
output from the processing steps. Each processing step is numbered; the number 
corresponds to the verbal description of the step in the extended description. 
While the processing step in the diagram is in general terms, the corresponding 
text is a specific description that includes a cross-reference to the code for the 
processing. 
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Diagram | 





Overview of 
AMASPZAP 










Diagram 2 Diagram 3 Diagram 4 






Replacing Data 
in a Physical 
Record 


Replacing Data 
in a Member 
and CSECT 







Producing Dumps 


Key to Method of Operatian (MQ) Diagram Symbols 


Entry inta processing Look for corresponding numbers in text 





A, B, etc. Look for blow-up of item on same page 


Flow of Control 


Look for corresponding-lettered blow-up 
on some page 


Data Transfer 


=> 
> 
> 


-at1_— >» 


Braces to denote related items 


Pointer to or address of 


——> 


See referenced diagram for detailed 
description 


Reference to dota 
Reference to another diagram 








Figure 5-J. Key to Method of Operation Diagrams for AMASPZAP 
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SPZAP Diagram 1. Overview of AMASPZAP 


From Operating System 
Input Process 





1 Process control statements: 


SYSLIB 


IDRDATA 
(LIB2) 
ens e NAME statement—Replace Updated Member 


C7 3-T and cSECT 


data in the specified mem- 
<_m ber and CSECT 
<a cones 


SYSLIB 
@ CCHHR statement— (LIB2) | UUpdated Physical 


Note: BASE, VERIFY, SETSSI; fieatpcatad aces 
and IDRDATA statements are P 


optional for this function. INDY, 
ns 


e DUMP(T) or 
ABSDUMP(T) statement: SYSPRINT 


Produce the type of dump 


requested 
SYSIN Device Note: VERIFY statement is Sc 
optional for this function. 


Diagram 4 





2 When there are no mora 
control statements, return 


ABSDUMP(T) to the operating system. 


OR 


DUMPI(T) 





To Operating System 
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SPZAP Diagram 2. Replacing Data in a Member and CSECT (Part 1 of 4) 


Input 


NAME Member’ [CSECT] 


SYSLIB 
(L1B2) 


BASE Offset 


A 


Expected 


VERIFY Offset 
. Content 


REP Offset Data 





Process 


Output 


"5 1 Find the member and CSECT 


NO 


& 


a. 


or 


“OLA 


on SYSLIB. Save the external 
symbol dictionary ID (ESDID), 
which was found in the com- 
posite external symbol dictio- 
nary {CESD) entry for the 
CSECT. 


Position to the text record aes 
which contains the CSECT, 
save CSECT address. 


Save the specified offset. 


Read the specified record and 
determine if it contains the 
expected data: 


@ Yes — continue pro- 
cessing cards. 
e@ No — ignore subse- 


quent REP card 
dump erroneous 


Replace (patch) the specified 
record providing that the veri- 
fy operation was successful or 
that there was no VERIFY 
Statement. Indicate that oper- 
ation has been performed. 


CSECTID 


IDSAVE 
CSECT Address 


BASE2 
Offset 


SYSLIB Record’ 


RDAREA 1 


IGNOP 


aw 
~ ~SYSLIB (LIB2) 


Updated 
CSECT 
MODIFY 
CTLBTE2 
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SPZAP Diagram 2. Replacing Data in a Member and CSECT (Part 2 of 4) 


Explanation Module — 


7 A BLDL macro instruction is issued to determine if AMASPZAP 
the member exists. If it does and a CSECT name 

is specified, the routine searches the CESD entries for the 

CSECT name. if no CSECT name is specified, find the 

first (lowest address) CSECT in the member. 


2 Position to the text record containing the CSECT 

by matching the ESDID with the ID in the control 
record which precedes the text record. Add the appro- 
priate offset to obtain the CSECT start address. If the 
scan finds at least one SPZAP IDR record but no unoc- 
cupied IDR entries, the return code will be set to 8 and 
subsequent REP and IDRDATA statements will be 
ignored, unless the IGNIDRFULL option has been 
specified. 


3. ~=Ifa BASE statement is read, save the specified 
offset so that it may be subtracted from the offsets 
given in subsequent REP and VERIFY statements. 


4  ifa VERIFY statement is read, find the record 
containing the data to be verified, determine 

the absolute address of the data, then read and com- 

pare the data. A split verify is made when the data to 

be verified extends over more than one text record. 

lf the comparison is negative, do not perform a 

replace operation and dump the incorrect data. 


& ‘Find the record containing the data, determine AMASPZAP 
the absolute address of the data, and then make 

the replacement (PATCH). A split is made when the 

data to be replaced extends over more than one text 

record. The MODIFY bit is set to 1 when the replace- 

ment is completed successfully. 


Label 


NAMERTN 
NAMEO0O1A 


NAMEO3D 
RDDSK4 
SPZAPIDR 
NAME04 


BASERTN 


VERYRTN 
SETUP1 
NAMEO7 
CCHNOTE 
NAME13 
DUMPO1A 


REPRTN 
SETUP1 
NAMEO?7 
CCHNOTE 


a 


Wal jo 4uadoig — sjeiajsy] pasueory 
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SPZAP Diagram 2. Replacing Data in a Member and CSECT (Part 3 of 4) 


Input Process 


6 
SETSSI xxyynnnn 


RETCODE 


wl 


IDRDATA User Data 


ye 


MODIFY 


lal 
5 





Find SSI and update it with 
the specified information, pro- 
viding that the verify and re- 
place operations were success- 
ful. 


Move IDR data into the IDR 
buffer in preparation for step 
8. 


When a new NAME, CCHHR, 
DUMP(T), or ABSDUMP(T) 
statement is found, or at end 
of job: 

e Ifan IDR exists, update it 
if a replace operation was 
performed. Use user-sup- 
plied data if present. 


@ Update the SSI if a replace 
operation was performed 
and no SETSSI statement 
appears between the REP 
statement and the next 
NAME, CCHAR, DUMP(T) 
or ABSDUMP(T) state- 


ment. 


Output 


SYSLIB (LIB2) 


IDRDATA 


ii 


Updated SSI 


Updated 
FIX Flag 


Local 


SYSLIB (LIB2) 


Updated With 
User Data or 
‘NO IDENT’ 
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SPZAP Diagram 2. Replacing Data in a Member and CSECT (Part 4 of 4) 


Explanation Module 


G6  =iIf aSETSSI statement is read and there have been 

no previous errors, the address of the SSI is obtained 
and placed in register 4. The user-specified SSI is then 
moved to the SS]. 


7 {fan IDRDATA statement is read and there is 

an unoccupied SPZAP IDR entry for the module, 
the IDRDATA value is stored in the user-data field of 
the IDR entry (which otherwise will be set to "NO 
IDENT”). If there are no empty IDR entries, or no IDR 
records, |IDRDATA statements are ignored. 


8 The !DR record is updated with the contents of 

the IDR DATA field (Either user data or “NO 
IDENT’). A message is issued giving the current and 
maximum number of IDR entries. (If current-naximum, 
an additional message is issued.) If the SSI is to be 
updated, the local FIX flag in the SSI is set. 


Note: |f a CHECKSUM statement is read, the contents AMASPZAP 
of the checksum accumulator are converted to printable 

hexadecimal, and the accumulator is reset. If the 

CHECKSUM statement has an operand equal to the 

converted checksum value, a checksum-correct message 

is written. Otherwise, the IGNOP bit of CTLBTE is set 

to inhibit REPs and SETSSIs until the next NAME or 

CCHHR statement. 


Label 


SSIRTN 
INSM1A 


IDRRTN 


INSMDFY 


CHSUMRTN 
CHSUM 
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SZAP Diagram 3. Replacing Data in a Physical Record (Part 1 of 2) 


Input Process 


ae Verify that the address speci- 
CCHHR Record Address: ed isvalid: 


SYSLIB 


Get the record. 


VERIFY Offset Compare actual and expected 
Expected Content contents of the record: indi- 
cate if they are unequal. 


Replace (patch) the record. 


REF Offset Data 


Issue Message indicating 
VOLSER, CCHHR, and 
DSNAME of updated record. 








lf Unequal 





Output 


RDAREA1 


Record to Be Replaced 


a: 
O 
v 


SYSLIB (LIB2) 


Replaced Record 
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SPZAP Diagram 3. Replacing Data in a Physical Record (Part 2 of 2) 


Explanation 


1. _—«‘The address specified in the CCHHR statement 
must be within the limits of the data set specified 
on the SYSLIB DD statement. 


2 ~=~=The record is read from the SYSLIB data set to 
RDAREAT1. 


3 If the actual and expected contents do match, the 

next record is read. Otherwise, the |GNOP switch 
is set so that a replace operation is not performed, and a 
dump of the unmatched record is taken. 


4 Providing that the verify operation was successful 
or if there was no VERIFY statement, the replace- 
ment is made. 


& Message AMA1211 is issued if a replace operation 

has been performed when a new NAME, CCHHR, 
DUMP(T), or ABSDUMP(T) statement is read, or, at end 
of job. 


Module 


AMASPZAP 


Label 
CCHHRTN 


CCHHSUB 


RDDSK 


VERYRTN 
SETUP1 
DUMP0O1AB 


REPRTN 
SETUP1 


INSMDFY 
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SPZAP Diagram 4. Producing Dumps (Part 1 of 2) 


Input Process 


Processing DUMP or DUMPT: 


1 Determine if the dump is to | CTLBTE2 
be translated (DUMPT). 









CSECT 
DUMP Member ALL 








TRANS 






/ CSECTIQ 


2 Find the member and CSECT. | eSDID. 
/ 










/ 
DUMPT Member at 3 Position to the text record / 
containing the CSECT. Je 
/ 
CSECT 4 Dump the CSECT: translate ——}-/ 
CSECT Name if required. 
or ALL 
—— 5B Repeat steps 2-4 if all CSECTs 
in the member are to be 
dumped, 
: ; Processing ABDUMP or ABDUMPT: 
Start Addr Stop Addr § Determine if the dump is to CTLBTE? 
ABSDUMP Member Name be translated (ABSDUMPT). 
ALL 
7 Process request according to TRANS 
options: STCSECT 
Start Addr Stop Addr e Start address stop address— Start Address 
Member Name convert the addresses to 
L 
ALL MBBCCHHR format. TTRSAVE 
e ALL — determine the start End Address 
and end addresses of the 
data to be dumped. 
e Member name — position CTLBTE2 
to the first record and set 
flag to indicate that mem- 
ber is being dumped MEME 
(MEMDMP). TRAN 


8 Dump the data. Translate if 
required. 





Dumped Data 








Wal jo Ajiadoig — s[euiajeya] pesuaory 


Wal JO STBLIQBIAl payoLysay sure}a0;) 


$861 7861 “tod Wal 1y8uAdoDd © 7-6811-8ZAT 


(dVZdSVWY) dezdg ‘¢ 1aideyp 


e1-s 


Cc 


SPZAP Diagram 4. Producing Dumps (Part 2 of 2) 


Explanation Module 


1. The TRANS switch in CTLBTE is set if DUMPT 
was specified. 


AMASPZAP 


2 A BLODL macro instruction, is issued to determine 

if the module exists. If it does, the routine searches 
the CESD (composite external symbol dictionary) entries 
for the CSECT name. 


3 Match the ESDID with the ID in the control record 
which precedes the text record. Add the appropri- 
ate offset. 


& The CSECT records are read, formatted, and written 

to the SYSPRINT data set. If DUMPT was specified, 
the records are translated before being written. The formats 
of translated and untranslated dumps are shown in Service 
Aids. 


5 = If ALL was specified, processing continues until all 
CSECTs in the member have been dumped. 


G6 The TRANS switch is set if ABSDUMPT was specified. AMASPZAP 


Js When the start address and stop address are specified 
on the control card, the addresses are converted and 
moved into the STCSECT and TTRSAVE fields. 


When ALL is specified on the control card, the start address 
of the SYSLIB data set is determined by examining the DEB. 
The end address of the data set is determined by examining 
the VTOC via the OBTAIN macro. 


When a member name is specified on the control card, the 
routine gets the member name and issues the FIND macro 
instruction to position to the first record. The MEMDMP 
switch is set to indicate that the dump operation should be 
stopped the first time end-of-file is reached. 


C 


Label 


DUMPRTN 


DUMPR1 
DUMP04 
NAMEO1A 


DUMPO1B 
DUMPO6B 
RDDSK4 


DUMP1 
DUMP0O1 
GRAP1 


DUMP04 
DUMPOG6B 


ABDMPRTN 


ABDMP1B 
ABDMP2 
CHCONV 


ABDMP3 
CHCONV 


ABDMP6 
SCANKEYS 


Explanation 


8 Adumpof the specified data is produced. If 
ABSDUMPT was specified, the records are trans- 

lated before being written. The formats of translated and 

untranslated dumps are shown in Service Aids. 


Start & Stop adr & ALL 


Member 


If translate 


Module 


Label 


ABDMP5 
DUMP1 
DUMPO1 


CONTB 


DUMP1 
DUMP01 


GRAP1 
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Section 3: Program Organization 





The superzap service aid program consists of one module which contains four 
CSECTs: 


@ AMASPZAP — controls the service aid operations and routes control to the 
AMASZDMP and AMASZIOR CSECTs. 


@ AMASPZAP — dumps data to the SYSPRINT data set. 


@ AMASPZAP — defines the constants used by the AMASPZAP service aid 
program. 


@ AMASPZAP — performs input/output and exit processing. 


CSECT Descriptions 


AMASPZAP — Control CSECT 
Entry from: The operating system. 
Entry point names: AMASPZAP. 


Data areas defined or updated: None. 





Size: 4K 
Routines called: AMASZIOR, AMASZDMP. 
Exits: To AMASZIOR. 


Operation: Routes control between subroutines in AMASZDMP and 
AMASZIOR; controls the processing. 


AMASZCON —Superzap Constants CSECT 
Entry from: N/A 
Entry point names: N/A 
Data areas defined or updated: N/A 
Size: 3K. 
Routines called: N/A 
Exits: N/A 


Operation: Contains constants and data areas used by the other three superzap 
CSECTs. 
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AMASZDMP — Dump CSECT 


Entry from: CSECT AMASPZAP. 
Entry point names: AMASZDMP. 
Data areas defined or updated: None. 
Size: 1K. 

Routines called: AMASZIOR. 

Exits; Return to AMASPZAP. 


Operation: Performs DUMP and ABSDUMP processing. 


AMASZIOR — Input/Output and Exit CSECT 


Entry from: AMASPZAP, AMASZDMP. 
Entry point names: AMASZIOR. 

Data areas defined or updated: None. 

Size: 2K. 

Routines called: None. 

Exits: Return to caller or exit to supervisor. 


Operation: Performs I/O operations, issues WTO macro instructions, contains 
SYNAD routines, and performs clean-up for exit processing. 


Section 4: Diagnostic Aids 


This section contains the following information to aid the reader in diagnosing 
SPZAP errors: 


@® A list of SPZAP switches that control processing. 
Notes: 


1. SPZAP consists of one module (AMASPZAP) with four CSECTs; 
AMASPZAP, AMASZCON, AMASZDMP, and AMASZIOR. 


2. Refer to System Messages for message numbers, message text, and detecting, 
issuing, and containing modules. 
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AMASPZAP Switches 


Switch Byte 
CTLBTE 


CTLBTE2 


Switch 


NAMEERR 


ENDMOD 


OVFLOW 


VERYOP 
IGNOP 


NAMEOP 


ONEREC 
PSIND 


FIRSTPCH 


MEMDMP 
MULREC 
TRAN 
MODIFY 


CTLBTE3 


NAMEIDR 


IDRRD 
MODFYREC 


NOSSI 
NOMEM 


LMREAD 


NENOIDR 
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wel 


The following defines the switches that AMASPZAP uses to control processing. 


Alignment Description 
Neue. vis Not used. 
ses. «Se An error in a NAME or CCHHR statement is detected to prohibit subsequent VER, 


REP, SETSSI, and IDRDATA operations. The switch is reset when a valid NAME 
or CCHHR statement is found. 


ee The last text record of a load module has been read. 
sol er Data to be verified or replaced extends over more than one block of text. 
ie A verify operation is being performed. 


lig A verify operation is unsuccessful. Reset when a NAME, CCHHR, DUMP, or 
ABSDUMP statement is read. 


al A NAME Statement is read to indicate that subsequent REP and VERIFY statements 
are for a CSECT within a load module. 


| A load module contains no CESD records. 


ee es ABSDUMP(T) ALL has been specified for a sequential data set. It indicates that the 
dump should be terminated when end of the file (EOF) is reached. 


XX. ou Not used. 


wel we More data may need to be moved into the text of message AMA122I if the data to be 
replaced extends over more than one text record. 


lie A member name is specified in an ABSDUMP statement. 
ee A load module is contained in more than one text record. 
alt The translate (T) option was specified on a DUMP or ABSDUMP statement. 


=| A replace operation has been performed for a CSECT specified in a NAME statement 5 
(contrast with MODFYREC). j 


SSIOP | rere An SSI update requested by a SETSSI card is being performed. If this switch 
is off and a replace operation has been performed, AMASPZAP sets the local fix flag 
in the SSI. 


ah sees An IDRDATA statement is read. 
-) (ree IDR space exists for new CSECT update (NAME and REP) entry. 


re | ue A replace operation has been performed at the address specified in a CCHHR 
statement (contrast with MODIFY). 


ie There is no SSI for the module to be updated. 


al: The name of the member whose SSI is to be updated is not found in the PDS 
directory. 


cal; All CESD records have been read to indicate that the input buffer (RDAREAI1) 
contains an IDR or control record. 





| A load module is not editable and contains no CESD records. 
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